diff options
Diffstat (limited to 'Util')
| -rwxr-xr-x | Util/helpfiles | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Util/helpfiles b/Util/helpfiles index 530bb15af..ba1c50a38 100755 --- a/Util/helpfiles +++ b/Util/helpfiles @@ -123,7 +123,7 @@ $print = 0; sub namesub { local($cmd) = shift; - if ($cmd =~ /^\w+$/) { + if ($cmd =~ /^\w*$/ && lc($cmd) eq $cmd) { $cmd; } elsif ($cmd eq '.') { 'dot'; @@ -261,6 +261,6 @@ foreach $file (<*>) { close(LINKFILE) unless($linkfile eq ''); # Make one sanity check -&Die('not all files were properly generated') unless(-r 'zmodload'); +&Die('not all files were properly generated') unless(-r 'ztcp'); __END__ |