Change 14188 by jhi@alpha on 2002/01/11 14:31:17
Yet another twist.
Affected files ...
.... //depot/perl/t/test.pl#34 edit
Differences ...
==== //depot/perl/t/test.pl#34 (text) ====
Index: perl/t/test.pl
--- perl/t/test.pl.~1~ Fri Jan 11 07:45:05 2002
+++ perl/t/test.pl Fri Jan 11 07:45:05 2002
@@ -280,7 +280,8 @@
my %args = @_;
my $runperl = $^X;
if ($args{switches}) {
- _quote_args(\$runperl, $args{switches});
+ _quote_args(\$runperl,
+ ref $args{switches} ? $args{switches} : [$args{switches}]);
}
unless ($args{nolib}) {
if ($is_macos) {
End of Patch.
