remove a warning

diff --git a/C4/AuthoritiesMarc.pm b/C4/AuthoritiesMarc.pm
index 67ad4e4..8f67f0d 100644 (file)
--- a/C4/AuthoritiesMarc.pm
+++ b/C4/AuthoritiesMarc.pm
@@ -246,7 +246,7 @@ sub SearchAuthorities {
             }#if value
         }
         ##Add how many queries generated
-               my $query;
+               $query='';
                foreach my $query_part (@queries){
                        $query=($query?$and.$query_part.$query:$query_part);
                }