From 11846f098da188793d3ab7a7ee449e6a978a6cca Mon Sep 17 00:00:00 2001
From: tipaul <tipaul>
Date: Tue, 22 Jun 2004 15:33:30 +0000
Subject: [PATCH] some improvements in SearchMarc

---
 C4/SearchMarc.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/C4/SearchMarc.pm b/C4/SearchMarc.pm
index 8a19ea79a7..5fb0810570 100644
--- a/C4/SearchMarc.pm
+++ b/C4/SearchMarc.pm
@@ -122,6 +122,8 @@ sub catalogsearch {
 	{
 		# replace * by %
 		@$value[$i] =~ s/\*/%/g;
+		# remove % at the beginning
+		@$value[$i] =~ s/^%//g;
 		if(@$excluding[$i])	# NOT statements
 		{
 			$any_not = 1;
-- 
2.39.2