diff options
author | Chris Wilson <chris+github@qwirx.com> | 2015-12-20 17:58:41 +0000 |
---|---|---|
committer | Chris Wilson <chris+github@qwirx.com> | 2015-12-20 18:12:44 +0000 |
commit | d18f1a336d8cf1760aaafb95cec6bbf43a7d637e (patch) | |
tree | 5bc1d9c1eed2b8b5c16f7cd0acf3f0d3c65e3e5c /runtest.pl.in | |
parent | ca50ccf991031c8d96b725a7cf210009f2cf4f8b (diff) |
Use rd instead of rmdir command, to try to work properly in appveyor.
I think something is on the PATH in Appveyor that makes rmdir /s/q fail,
especially when run through Perl.
Diffstat (limited to 'runtest.pl.in')
-rwxr-xr-x | runtest.pl.in | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/runtest.pl.in b/runtest.pl.in index 5b8b4bbe..775b13ac 100755 --- a/runtest.pl.in +++ b/runtest.pl.in @@ -129,7 +129,7 @@ sub runtest if(-d $test_dst_dir) { - unshift @commands, "rmdir /s /q $test_dst_dir"; + unshift @commands, "rd /s /q $test_dst_dir"; } foreach my $command (@commands) @@ -159,7 +159,7 @@ sub runtest { if(-d "$test_dst_dir\\$1") { - my $cmd = "rmdir /s/q $test_dst_dir\\$1"; + my $cmd = "rd /s/q $test_dst_dir\\$1"; my $status = system($cmd); $status == 0 or die "$cmd: failed with ". "status $status"; |