[Koha-patches] [biblibre-integration] Adding autotruncation
Henri-Damien LAURENT
henridamien.laurent at biblibre.com
Wed Sep 2 17:38:37 CEST 2009
---
C4/Search.pm | 14 ++++----------
1 files changed, 4 insertions(+), 10 deletions(-)
diff --git a/C4/Search.pm b/C4/Search.pm
index fa3950f..27bceb4 100644
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -922,16 +922,6 @@ sub buildQuery {
# Some helpful index variants
my $index_plus = $index . $struct_attr . ":" if $index;
my $index_plus_comma = $index . $struct_attr . "," if $index;
- if ($auto_truncation){
-# FIXME Auto Truncation is only valid for LTR languages
-# use C4::Output;
-# use C4::Languages qw(regex_lang_subtags get_bidi);
-# $lang = $query->cookie('KohaOpacLanguage') if (defined $query && $query->cookie('KohaOpacLanguage'));
-# my $current_lang = regex_lang_subtags($lang);
-# my $bidi;
-# $bidi = get_bidi($current_lang->{script}) if $current_lang->{script};
- $index_plus_comma .= "rtrn:";
- }
# Remove Stopwords
if ($remove_stopwords) {
@@ -942,6 +932,10 @@ sub buildQuery {
if ( $stopwords_removed && $DEBUG );
}
+ if ($auto_truncation){
+ $operand=~join(" ",map{ "$_*" }split (/\s+/,$operand));
+ }
+
# Detect Truncation
my $truncated_operand;
my( $nontruncated, $righttruncated, $lefttruncated,
--
1.6.0.4
More information about the Koha-patches
mailing list