diff options
| -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 608d243863..afc1e5786e 100644 --- a/vms/test.com +++ b/vms/test.com @@ -171,7 +171,7 @@ while ($test = shift) { } else { $switch = ''; } - open(results,"\$ MCR Sys\$Disk:[]Perl. \"-I[-.lib]\" $switch $test |") || (print "can't run.\n"); + open(results,"\$ MCR Sys\$Disk:[]Perl. \"-I[-.lib]\" $switch $test 2>&1|") || (print "can't run.\n"); $ok = 0; $next = 0; $pending_not = 0; |