This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Replaced 'unlink' with 'unlink_all' in t/op/filetest.t
authorBrad Gilbert <b2gills@gmail.com>
Tue, 7 Dec 2010 23:11:23 +0000 (17:11 -0600)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 8 Dec 2010 19:16:47 +0000 (11:16 -0800)
t/op/filetest.t

index 4659c70..f562646 100644 (file)
@@ -87,7 +87,7 @@ ok( -f $tempfile );
 is( -s $tempfile, 0 );
 is( -f -s $tempfile, 0 );
 is( -s -f $tempfile, 0 );
-unlink $tempfile;
+unlink_all $tempfile;
 
 # test that _ is a bareword after filetest operators