diff options
| author | Frédéric Buclin <LpSolit@gmail.com> | 2012-03-30 00:27:12 +0200 |
|---|---|---|
| committer | Frédéric Buclin <LpSolit@gmail.com> | 2012-03-30 00:27:12 +0200 |
| commit | a502cf9085f0394f91a0ae263d51a34dc8445a6b (patch) | |
| tree | 88b516afe3f9a928ae2fe4cdc49e8ef838bcbe1b /Bugzilla/Search | |
| parent | 8f4fd271de4edbf1a206dfa0a98f8276f6189709 (diff) | |
| download | bugzilla-a502cf9085f0394f91a0ae263d51a34dc8445a6b.tar.gz bugzilla-a502cf9085f0394f91a0ae263d51a34dc8445a6b.tar.xz | |
Fix bustage: Perl 5.8.x doesn't understand \g1 in regexp (must use \1 instead)
Diffstat (limited to 'Bugzilla/Search')
| -rw-r--r-- | Bugzilla/Search/Quicksearch.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Bugzilla/Search/Quicksearch.pm b/Bugzilla/Search/Quicksearch.pm index 7b951d5ae..1d5965bf7 100644 --- a/Bugzilla/Search/Quicksearch.pm +++ b/Bugzilla/Search/Quicksearch.pm @@ -421,7 +421,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; } |