diff options
Diffstat (limited to 'scripts/Dpkg/Package.pm')
-rw-r--r-- | scripts/Dpkg/Package.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/scripts/Dpkg/Package.pm b/scripts/Dpkg/Package.pm index 04fbb00d5..cf5771ee3 100644 --- a/scripts/Dpkg/Package.pm +++ b/scripts/Dpkg/Package.pm @@ -32,8 +32,8 @@ sub pkg_name_is_illegal($) { if ($name eq '') { return _g('may not be empty string'); } - if ($name =~ m/[^-+.0-9a-z]/o) { - return sprintf(_g("character '%s' not allowed"), $&); + if ($name =~ m/[^-+.0-9a-z]/op) { + return sprintf(_g("character '%s' not allowed"), ${^MATCH}); } if ($name !~ m/^[0-9a-z]/o) { return _g('must start with an alphanumeric character'); |