From: Henri-Damien LAURENT <henridamien.laurent@biblibre.com>
Date: Mon, 21 Sep 2009 21:04:46 +0000 (+0200)
Subject: C4/Search.pm followup auto_truncation
X-Git-Tag: v3.00.04~82
X-Git-Url: http://koha-dev.rot13.org:8081/gitweb/?a=commitdiff_plain;h=3287252c0;p=koha-ffzg.git

C4/Search.pm followup auto_truncation

Auto_truncation is used even though exact search selected.
This patch removes this side effect
---

diff --git a/C4/Search.pm b/C4/Search.pm
index 353c5abded..809bc87ea4 100644
--- a/C4/Search.pm
+++ b/C4/Search.pm
@@ -1125,11 +1125,13 @@ sub buildQuery {
                 }
 
                 if ($auto_truncation){
-					#FIXME only valid with LTR scripts
-					$operand=join(" ",map{ 
-											"$_*" 
-									     }split (/\s+/,$operand));
-                	warn $operand if $DEBUG;
+					unless ( $index =~ /(st-|phr|ext)/ ) {
+						#FIXME only valid with LTR scripts
+						$operand=join(" ",map{ 
+												"$_*" 
+											 }split (/\s+/,$operand));
+						warn $operand if $DEBUG;
+					}
 				}
 
                 # Detect Truncation
@@ -1397,6 +1399,7 @@ sub searchResults {
     # loop through all of the records we've retrieved
     for ( my $i = $offset ; $i <= $times - 1 ; $i++ ) {
         my $marcrecord = MARC::File::USMARC::decode( $marcresults[$i] );
+		my $biblionumber;
         
         if(not $scan){
             if ($bibliotag<10){