From: root <root@descartes.biblibre.com>
Date: Fri, 16 Oct 2009 21:40:13 +0000 (+0200)
Subject: Bug Fixing MT 2095 : Add_excepti.al Search broken on QueryStemming
X-Git-Tag: v3.02.00-alpha~54^2~157
X-Git-Url: http://git.rot13.org/?a=commitdiff_plain;h=e964e49c8919177a4e255226ace9bb94f607e762;p=koha.git

Bug Fixing MT 2095 : Add_excepti.al Search broken on QueryStemming
---

diff --git a/C4/Search.pm b/C4/Search.pm
index 33c79fc982..010f59f6e1 100644
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -695,7 +695,7 @@ sub _detect_truncation {
 # STEMMING
 sub _build_stemmed_operand {
     my ($operand,$lang) = @_;
-    require Lingua::Stem::Snowball;
+    require Lingua::Stem::Snowball ;
     my $stemmed_operand;
 
     # If operand contains a digit, it is almost certainly an identifier, and should
@@ -706,18 +706,10 @@ sub _build_stemmed_operand {
     return $operand if $operand =~ /\d/;
 
 # FIXME: the locale should be set based on the user's language and/or search choice
+    warn "$lang";
     my $stemmer = Lingua::Stem::Snowball->new( lang => $lang,
                                                encoding => "UTF-8" );
 
-# FIXME: these should be stored in the db so the librarian can modify the behavior
-# Lingua::Stem can't add exceptions
-#    $stemmer->add_exceptions(
-#        {
-#            'and' => 'and',
-#            'or'  => 'or',
-#            'not' => 'not',
-#        }
-#    );
     my @words = split( / /, $operand );
     my @stems = $stemmer->stem(\@words);
     for my $stem (@stems) {