From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 1 Oct 1999 06:58:10 +0000 (+0000)
Subject: Temp file cleanliness.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cfcb0b09a4c7cff7274c3b329d4dc27f192b7434;p=p5sagit%2Fp5-mst-13.2.git

Temp file cleanliness.

p4raw-id: //depot/cfgperl@4267
---

diff --git a/t/lib/filecopy.t b/t/lib/filecopy.t
index e461595..7ef68eb 100755
--- a/t/lib/filecopy.t
+++ b/t/lib/filecopy.t
@@ -88,3 +88,7 @@ print "not " unless $foo eq "ok 3\n" and not -e "file-$$";;
 print "ok 11\n";
 unlink "lib/file-$$" or die "unlink: $!";
 
+END {
+    1 while unlink "file-$$";
+    1 while unlink "lib/file-$$";
+}