diff options
| -rw-r--r-- | MANIFEST | 2 | ||||
| -rw-r--r-- | t/win32/system.t | 6 | ||||
| -rw-r--r-- | t/win32/system_tests (renamed from t/op/system_tests) | 0 |
3 files changed, 4 insertions, 4 deletions
@@ -2523,7 +2523,6 @@ t/op/subst_amp.t See if $&-related substitution works t/op/subst_wamp.t See if substitution works with $& present t/op/sub_lval.t See if lvalue subroutines work t/op/sysio.t See if sysread and syswrite work -t/op/system_tests Test runner for system.t t/op/taint.t See if tainting works t/op/tie.t See if tie/untie functions work t/op/tiearray.t See if tie for arrays works @@ -2599,6 +2598,7 @@ t/uni/title.t See if Unicode casing works t/uni/upper.t See if Unicode casing works t/win32/longpath.t Test if Win32::GetLongPathName() works t/win32/system.t See if system works in Win* +t/win32/system_tests Test runner for system.t t/x2p/s2p.t See if s2p/psed work taint.c Tainting code thrdvar.h Per-thread variables diff --git a/t/win32/system.t b/t/win32/system.t index 5384d7c279..c08fb13e04 100644 --- a/t/win32/system.t +++ b/t/win32/system.t @@ -96,7 +96,7 @@ chdir($testdir); END { chdir($cwd) && rmtree("$cwd/$testdir") if -d "$cwd/$testdir"; } -if (open(my $EIN, "$cwd/op/${exename}_exe.uu")) { +if (open(my $EIN, "$cwd/win32/${exename}_exe.uu")) { print "# Unpacking $exename.exe\n"; my $e; { @@ -142,8 +142,8 @@ unless (-x "$testdir/$exename.exe") { exit(0); } -open my $T, "$^X -I../lib -w op/system_tests |" - or die "Can't spawn op/system_tests: $!"; +open my $T, "$^X -I../lib -w win32/system_tests |" + or die "Can't spawn win32/system_tests: $!"; my $expect; my $comment = ""; my $test = 0; diff --git a/t/op/system_tests b/t/win32/system_tests index f73745ae8f..f73745ae8f 100644 --- a/t/op/system_tests +++ b/t/win32/system_tests |