From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 29 Aug 2000 14:30:47 +0000 (+0000)
Subject: Don't forget to tidy up.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c8be8828154db134063cd3d800868fef886ed163;p=p5sagit%2Fp5-mst-13.2.git

Don't forget to tidy up.

p4raw-id: //depot/perl@6885
---

diff --git a/t/lib/ftmp-security.t b/t/lib/ftmp-security.t
index 2466916..3f563f4 100755
--- a/t/lib/ftmp-security.t
+++ b/t/lib/ftmp-security.t
@@ -108,6 +108,7 @@ sub test_security {
   my($fname2) = "foobar$$";
   my $fh2;
   open($fh2, ">$fname2") || warn "$0: failed to create '$fname2': $!\n";
+  END { unlink($fname2) }
   ok( (-e $fname2) );
   close($fh2);