projects / platform / upstream / perl.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 5fd6a57)
Replaced 'unlink' with 'unlink_all' in t/re/qr.t
authorBrad Gilbert <b2gills@gmail.com>
Tue, 7 Dec 2010 23:14:12 +0000 (17:14 -0600)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 8 Dec 2010 19:17:22 +0000 (11:17 -0800)
t/re/qr.t patch | blob | history

diff --git a/t/re/qr.t b/t/re/qr.t
index 7a7ca6a..fa5135f 100644 (file)
--- a/t/re/qr.t
+++ b/t/re/qr.t
@@ -121,7 +121,7 @@ EOTEST
     close $fh;
 
     my $out = runperl(stderr => 1, progfile => $prog);
-    unlink $prog;
+    unlink_all $prog;
 
     my $expected = <<'EOOUT';
 ok 1 - weak copy equals original
Domain: System / Base;