From 3287252c0f71a10091995beff4eeb18257bbbc04 Mon Sep 17 00:00:00 2001
From: Henri-Damien LAURENT <henridamien.laurent@biblibre.com>
Date: Mon, 21 Sep 2009 23:04:46 +0200
Subject: [PATCH] C4/Search.pm followup auto_truncation

Auto_truncation is used even though exact search selected.
This patch removes this side effect
---
 C4/Search.pm | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

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){
-- 
2.39.2