diff options
author | joey <joey> | 2001-04-04 00:51:47 +0000 |
---|---|---|
committer | joey <joey> | 2001-04-04 00:51:47 +0000 |
commit | e3f252493cc65ecbc3b6bb0b53af0358cb496450 (patch) | |
tree | 1ae72a578e3b755f1acbbd79d725032d27c22773 /dh_installman | |
parent | 16b07580c140e8eb17f33fc66ea218d402d174e1 (diff) |
r459: use predefined character classes for readability
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 9c71774f..e48ff6aa 100755 --- a/dh_installman +++ b/dh_installman @@ -97,14 +97,14 @@ foreach my $package (@{$dh{DOPACKAGES}}) { open (IN, $page) or die "$page: $!"; } while (<IN>) { - if (/^\.TH\s+[^ ]+\s+(\d+[^ ]*)\s/) { + if (/^\.TH\s+\S+\s+(\d+\S*)\s/) { $section=$1; last; } } # Failing that, we can try to get it from the filename. if (! $section) { - ($section)=$basename=~m/.*\.([1-9][^ ]*)/; + ($section)=$basename=~m/.*\.([1-9]\S*)/; } # Now get the numeric component of the section. |