From 4d44d44a1070263051e2e6349db1ced0b358ce44 Mon Sep 17 00:00:00 2001
From: Brad Gilbert <b2gills@gmail.com>
Date: Tue, 7 Dec 2010 17:11:52 -0600
Subject: Replaced 'unlink' with 'unlink_all' in t/op/goto.t

---
 t/op/goto.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/t/op/goto.t b/t/op/goto.t
index 12bade9b13..4de47efa5a 100644
--- a/t/op/goto.t
+++ b/t/op/goto.t
@@ -231,7 +231,7 @@ close $f;
 
 $r = runperl(prog => 'use Op_goto01; print qq[DONE\n]');
 is($r, "OK\nDONE\n", "goto within use-d file"); 
-unlink "Op_goto01.pm";
+unlink_all "Op_goto01.pm";
 
 # test for [perl #24108]
 $ok = 1;
-- 
cgit v1.2.1