diff options
author | joerg <joerg@FreeBSD.org> | 1995-04-01 11:43:09 +0000 |
---|---|---|
committer | joerg <joerg@FreeBSD.org> | 1995-04-01 11:43:09 +0000 |
commit | 41b5517e4c0b1bdc3fe5bc2cc054b60b8c2adb81 (patch) | |
tree | 274f9117cc8994ebfdc7f7cd97933b5feb890b28 /gnu/usr.bin | |
parent | c4810f7eee39166b39bb7f8804df531c4c220066 (diff) | |
download | FreeBSD-src-41b5517e4c0b1bdc3fe5bc2cc054b60b8c2adb81.zip FreeBSD-src-41b5517e4c0b1bdc3fe5bc2cc054b60b8c2adb81.tar.gz |
Fix the
Ignore wrong indent value: ``''
bug, as reported by Chris Kukulies.
Diffstat (limited to 'gnu/usr.bin')
-rw-r--r-- | gnu/usr.bin/man/makewhatis/makewhatis.perl | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/gnu/usr.bin/man/makewhatis/makewhatis.perl b/gnu/usr.bin/man/makewhatis/makewhatis.perl index 14be120..af2fc5d 100644 --- a/gnu/usr.bin/man/makewhatis/makewhatis.perl +++ b/gnu/usr.bin/man/makewhatis/makewhatis.perl @@ -35,7 +35,7 @@ # # E-Mail: Wolfram Schneider <wosch@cs.tu-berlin.de> # -# $Id: makewhatis.pl,v 1.10 1995/03/29 09:44:34 w Exp $ +# $Id: makewhatis.perl,v 1.5 1995/03/31 04:00:53 joerg Exp $ # sub usage { @@ -425,10 +425,12 @@ sub parse { else { &usage } } - if ($i =~ /^[0-9]+$/) { - $indent = $i; - } else { - warn "Ignore wrong indent value: ``$i''\n"; + if ($i ne "") { + if ($i =~ /^[0-9]+$/) { + $indent = $i; + } else { + warn "Ignoring wrong indent value: ``$i''\n"; + } } return &absolute_path(@argv) if $#argv >= 0; |