From: Frédéric Buclin <LpSolit@gmail.com>
Date: Mon, 27 Jan 2014 18:33:31 +0000 (+0100)
Subject: Fix bustage in Perl 5.10 and 5.12
X-Git-Tag: bugzilla-4.5.2~3
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=7b1bed5a32ce5f19cdee77783a4e4121c01c4a9e;p=thirdparty%2Fbugzilla.git

Fix bustage in Perl 5.10 and 5.12

https://bugzilla.mozilla.org/show_bug.cgi?id=76498
---

diff --git a/Bugzilla/Search/Quicksearch.pm b/Bugzilla/Search/Quicksearch.pm
index 3448b0bdb1..ced19b4c3d 100644
--- a/Bugzilla/Search/Quicksearch.pm
+++ b/Bugzilla/Search/Quicksearch.pm
@@ -402,7 +402,7 @@ sub _handle_field_names {
 
     # Generic field1,field2,field3:value1,value2 notation.
     # We have to correctly ignore commas and colons in quotes.
-    foreach my $symbol (keys OPERATOR_SYMBOLS) {
+    foreach my $symbol (keys %{ OPERATOR_SYMBOLS() }) {
         my @field_values = parse_line($symbol, 1, $or_operand);
         next unless scalar @field_values == 2;
         my @fields = parse_line(',', 1, $field_values[0]);