[Koha-patches] [PATCH] Adding some fixing for NoZebra

Henri-Damien LAURENT henridamien.laurent at biblibre.com
Wed Nov 19 14:58:15 CET 2008


---
 C4/Biblio.pm |    6 ++----
 1 files changed, 2 insertions(+), 4 deletions(-)
 mode change 100644 => 100755 C4/Biblio.pm

diff --git a/C4/Biblio.pm b/C4/Biblio.pm
old mode 100644
new mode 100755
index e98a264..e66f58e
--- a/C4/Biblio.pm
+++ b/C4/Biblio.pm
@@ -2195,13 +2195,11 @@ sub ModZebra {
 sub GetNoZebraIndexes {
     my $index = C4::Context->preference('NoZebraIndexes');
     my %indexes;
-    foreach my $line (split /('|"),/,$index) {
+    foreach my $line (split /('|"),[\n\r]*/,$index) {
         $line =~ /(.*)=>(.*)/;
-        my $index = substr($1,1); # get the index, don't forget to remove initial ' or "
+        my $index = $1; # initial ' or " is removed afterwards
         my $fields = $2;
         $index =~ s/'|"|\s//g;
-
-
         $fields =~ s/'|"|\s//g;
         $indexes{$index}=$fields;
     }
-- 
1.6.0.2




More information about the Koha-patches mailing list