diff options
Diffstat (limited to 'scripts/dpkg-gensymbols.pl')
-rwxr-xr-x | scripts/dpkg-gensymbols.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/dpkg-gensymbols.pl b/scripts/dpkg-gensymbols.pl index 142596535..99cc8ab4e 100755 --- a/scripts/dpkg-gensymbols.pl +++ b/scripts/dpkg-gensymbols.pl @@ -93,8 +93,8 @@ sub usage { my @files; while (@ARGV) { $_ = shift(@ARGV); - if (m/^-p/) { - $oppackage = $'; + if (m/^-p/p) { + $oppackage = ${^POSTMATCH}; my $err = pkg_name_is_illegal($oppackage); error(_g("illegal package name '%s': %s"), $oppackage, $err) if $err; } elsif (m/^-c(\d)?$/) { |