diff options
| author | Charles Bailey <bailey@newman.upenn.edu> | 1997-11-26 08:32:09 -0400 |
|---|---|---|
| committer | Malcolm Beattie <mbeattie@sable.ox.ac.uk> | 1997-12-17 14:44:26 +0000 |
| commit | 61bb59065bf1b12edab39b124e7373fb357e2d73 (patch) | |
| tree | ebb609aa27a57d50ce9b7784a3b992673a9a6476 /vms/test.com | |
| parent | 39e571d41067215a80f26089b260f1418caeb36b (diff) | |
| download | perl-61bb59065bf1b12edab39b124e7373fb357e2d73.tar.gz | |
Lots of VMS changes. vms/gen_shrfls.pl (which parses header files)
needs rewriting now that we use perlvars.h and foovar.h:
Subject: [PATCH] 5.004_54 under VMS (fwd)
p4raw-id: //depot/perl@374
Diffstat (limited to 'vms/test.com')
| -rw-r--r-- | vms/test.com | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/vms/test.com b/vms/test.com index 114cb24a40..201b5f57d6 100644 --- a/vms/test.com +++ b/vms/test.com @@ -111,7 +111,7 @@ $| = 1; @ARGV = grep($_,@ARGV); # remove empty elements due to "''p1'" syntax -if ($ARGV[0] eq '-v') { +if (lc($ARGV[0]) eq '-v') { $verbose = 1; shift; } |