diff options
author | Peter Pentchev <roam@ringlet.net> | 2016-04-08 17:42:25 +0300 |
---|---|---|
committer | Niels Thykier <niels@thykier.net> | 2016-05-01 08:02:11 +0000 |
commit | 8f05076e7b406e1e57b3f2becea00c75db183b28 (patch) | |
tree | 94df775aebcceb10c227d26ee096b102cdff4f73 /dh_installman | |
parent | cab556dbff039108e206563d29a37c115488687c (diff) | |
download | debhelper-8f05076e7b406e1e57b3f2becea00c75db183b28.tar.gz |
Drop .* from the beginning of unanchored regular expressions
Signed-off-by: Niels Thykier <niels@thykier.net>
Diffstat (limited to 'dh_installman')
-rwxr-xr-x | dh_installman | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/dh_installman b/dh_installman index 12d473c6..af2d136d 100755 --- a/dh_installman +++ b/dh_installman @@ -140,7 +140,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) { close($fd); # Failing that, we can try to get it from the filename. if (! $section) { - ($section)=$basename=~m/.*\.([1-9]\S*)/; + ($section)=$basename=~m/\.([1-9]\S*)/; } # Now get the numeric component of the section. @@ -158,7 +158,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) { # Translated man pages are typically specified by adding the # language code to the filename, so detect that and # redirect to appropriate directory, stripping the code. - ($langcode)=$basename=~m/.*\.([a-z][a-z](?:_[A-Z][A-Z])?)\.(?:[1-9]|man)/; + ($langcode)=$basename=~m/\.([a-z][a-z](?:_[A-Z][A-Z])?)\.(?:[1-9]|man)/; } elsif ($dh{LANGUAGE} ne 'C') { $langcode=$dh{LANGUAGE}; |