summaryrefslogtreecommitdiff
path: root/scripts/dpkg-gensymbols.pl
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/dpkg-gensymbols.pl')
-rwxr-xr-xscripts/dpkg-gensymbols.pl4
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)?$/) {