diff options
author | Edward Peschko <edwardp@excitehome.net> | 2001-02-26 10:51:58 -0800 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-02-27 05:59:50 +0000 |
commit | e4f0d88dd7061f3d9b4bbe01e378d668273f5363 (patch) | |
tree | 59e34c1e1f96dddf3bfaa599fdb59b957c527b3c /lib/Test | |
parent | e982885c7ba24a5bfd453c5e627281408fc80421 (diff) | |
download | perl-e4f0d88dd7061f3d9b4bbe01e378d668273f5363.tar.gz |
Re: Compile with perlcc..
Message-ID: <20010226185158.A9871@excitehome.net>
plus add a simple usage message if no arguments given.
p4raw-id: //depot/perl@8955
Diffstat (limited to 'lib/Test')
-rw-r--r-- | lib/Test/Harness.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Test/Harness.pm b/lib/Test/Harness.pm index ab913f77bb..c26db92ac4 100644 --- a/lib/Test/Harness.pm +++ b/lib/Test/Harness.pm @@ -104,7 +104,7 @@ sub _runtests { my $cmd = ($ENV{'HARNESS_COMPILE_TEST'}) ? "./perl -I../lib ../utils/perlcc $test " - . "-run 2>> ./compilelog |" + . "-r 2>> ./compilelog |" : "$^X $s $test|"; $cmd = "MCR $cmd" if $^O eq 'VMS'; open(my $fh, $cmd) or print "can't run $test. $!\n"; |