X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fpragma%2Fwarnings.t;h=09b41fbd64a0c1587ccbfd87066c1383e70df66c;hb=d780cd7a0195e946e636d3ee546f6ef4f21d6acc;hp=591f0399abbff5f2af92343ed6380b4a4bcb09af;hpb=dd69b62cec547dc0162db14f1d9a0bb499a8fa04;p=p5sagit%2Fp5-mst-13.2.git diff --git a/t/pragma/warnings.t b/t/pragma/warnings.t index 591f039..09b41fb 100644 --- a/t/pragma/warnings.t +++ b/t/pragma/warnings.t @@ -11,6 +11,7 @@ $| = 1; my $Is_VMS = $^O eq 'VMS'; my $Is_MSWin32 = $^O eq 'MSWin32'; +my $Is_NetWare = $^O eq 'NetWare'; my $tmpfile = "tmp0000"; my $i = 0 ; 1 while -f ++$tmpfile; @@ -86,6 +87,8 @@ for (@prgs){ `./perl "-I../lib" $switch $tmpfile 2>&1` : $Is_MSWin32 ? `.\\perl -I../lib $switch $tmpfile 2>&1` : + $Is_NetWare ? + `perl -I../lib $switch $tmpfile 2>&1` : `./perl -I../lib $switch $tmpfile 2>&1`; my $status = $?; $results =~ s/\n+$//;