aboutsummaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorRuslan Ermilov <ru@FreeBSD.org>2001-08-09 15:23:30 +0000
committerRuslan Ermilov <ru@FreeBSD.org>2001-08-09 15:23:30 +0000
commit9023135631ae200f5839d47a6647104d2b8c4159 (patch)
tree74c7dd8e12bafd551344e059bb22b450cd09111d /gnu
parentb07badb7bd8f0d03ba06a951f1a59ad6c36f0fe3 (diff)
Notes
Diffstat (limited to 'gnu')
-rw-r--r--gnu/usr.bin/man/makewhatis/makewhatis.perl4
1 files changed, 2 insertions, 2 deletions
diff --git a/gnu/usr.bin/man/makewhatis/makewhatis.perl b/gnu/usr.bin/man/makewhatis/makewhatis.perl
index 599220e127fc5..11b0249feb804 100644
--- a/gnu/usr.bin/man/makewhatis/makewhatis.perl
+++ b/gnu/usr.bin/man/makewhatis/makewhatis.perl
@@ -344,7 +344,7 @@ sub manual {
chop;
s/^\.IX\s.*//; # delete perlpod garbage
s/^\.[A-Z]+[ ]+[0-9]+$//; # delete commands
- s/^\.[A-Za-z]+[ \t]*//; # delete commands
+ s/^\.[A-Za-z]*[ \t]*//; # delete commands
s/^\.\\".*$//; #" delete comments
s/^[ \t]+//;
if ($_) {
@@ -375,7 +375,7 @@ sub manual {
$list .= @_[1];
$list .= "(@_[2])" if @_[2];
} else {
- s/^\.[A-Z][a-z][ \t]*//;
+ s/^\.([A-Z][a-z])?[ \t]*//;
s/[ \t]+$//;
$list .= $_;
}