diff options
Diffstat (limited to 'scripts/Dpkg/Vendor/Ubuntu.pm')
| -rw-r--r-- | scripts/Dpkg/Vendor/Ubuntu.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/Dpkg/Vendor/Ubuntu.pm b/scripts/Dpkg/Vendor/Ubuntu.pm index 44abf41e2..68ac7c0d4 100644 --- a/scripts/Dpkg/Vendor/Ubuntu.pm +++ b/scripts/Dpkg/Vendor/Ubuntu.pm @@ -170,8 +170,8 @@ sub find_launchpad_closes { my %closes; while ($changes && - ($changes =~ /lp:\s+\#\d+(?:,\s*\#\d+)*/ig)) { - $closes{$_} = 1 foreach ($& =~ /\#?\s?(\d+)/g); + ($changes =~ /lp:\s+\#\d+(?:,\s*\#\d+)*/pig)) { + $closes{$_} = 1 foreach (${^MATCH} =~ /\#?\s?(\d+)/g); } my @closes = sort { $a <=> $b } keys %closes; |