From 29416b9fc691e0af9ba8974c5f24f8ad4b9f8c16 Mon Sep 17 00:00:00 2001 From: Frédéric Buclin Date: Fri, 30 Mar 2012 00:23:26 +0200 Subject: Fix bustage: Perl 5.8.x doesn't understand \g1 in regexp (must use \1 instead) --- 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 cd4deb94c..5c079c66d 100644 --- a/Bugzilla/Search/Quicksearch.pm +++ b/Bugzilla/Search/Quicksearch.pm @@ -408,7 +408,7 @@ sub _handle_field_names { # If the string was quoted to protect some special # characters such as commas and colons, we need # to remove quotes. - if ($value =~ /^(["'])(.+)\g1$/) { + if ($value =~ /^(["'])(.+)\1$/) { $value = $2; $value =~ s/\\(["'])/$1/g; } -- cgit v1.2.3-65-gdbad