From 7b1bed5a32ce5f19cdee77783a4e4121c01c4a9e Mon Sep 17 00:00:00 2001
From: =?utf8?q?Fr=C3=A9d=C3=A9ric=20Buclin?= <LpSolit@gmail.com>
Date: Mon, 27 Jan 2014 19:33:31 +0100
Subject: [PATCH] Fix bustage in Perl 5.10 and 5.12

https://bugzilla.mozilla.org/show_bug.cgi?id=76498
---
 Bugzilla/Search/Quicksearch.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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]);
-- 
2.47.2