some improvements in SearchMarc

diff --git a/C4/SearchMarc.pm b/C4/SearchMarc.pm
index 8a19ea7..5fb0810 100644 (file)
--- 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;