Change 14185 by jhi@alpha on 2002/01/11 14:10:01
Arguments were being mangled.
Affected files ...
.... //depot/perl/t/test.pl#33 edit
Differences ...
==== //depot/perl/t/test.pl#33 (text) ====
Index: perl/t/test.pl
--- perl/t/test.pl.~1~ Fri Jan 11 07:15:07 2002
+++ perl/t/test.pl Fri Jan 11 07:15:07 2002
@@ -280,7 +280,7 @@
my %args = @_;
my $runperl = $^X;
if ($args{switches}) {
- _quote_args(\$runperl, [$args{switches}]);
+ _quote_args(\$runperl, $args{switches});
}
unless ($args{nolib}) {
if ($is_macos) {
End of Patch.