Yet another twist.

p4raw-id: //depot/perl@14188

1 files changed, 2 insertions, 1 deletions

diff --git a/t/test.pl b/t/test.pl
index 379e136a53..5f358b9a81 100644
--- a/t/test.pl
+++ b/t/test.pl
@@ -280,7 +280,8 @@ sub runperl {
     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) {