From d39d06e0ebfb87e98b5229b52e10f2b11b967441 Mon Sep 17 00:00:00 2001 From: Martin Stenberg Date: Mon, 21 Sep 2015 13:16:39 +0200 Subject: [PATCH] Bug 14555: Warns in opac-search.pl Avoid use of uninitialized value in split == Test plan == 1. Go to opac advanced search 2. Click "Search" without any search query 3. Log file will show "Use of uninitialized value in split at ..." 4. Apply this patch 5. Repeat step 1 and 2 6. Log file should no longer show "Use of uninitialized value in split at ..." Sponsored-by: Regionbibliotek Halland / County library of Halland --- opac/opac-search.pl | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/opac/opac-search.pl b/opac/opac-search.pl index bc703b3..3a399cb 100755 --- a/opac/opac-search.pl +++ b/opac/opac-search.pl @@ -526,7 +526,8 @@ my @results; sub _input_cgi_parse { my @elements; - for my $this_cgi ( split('&',shift) ) { + my $query_cgi = shift or return @elements; + for my $this_cgi ( split('&',$query_cgi) ) { next unless $this_cgi; $this_cgi =~ /(.*?)=(.*)/; push @elements, { input_name => $1, input_value => Encode::decode_utf8( uri_unescape($2) ) }; -- 2.6.4