diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-10-01 06:58:10 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-10-01 06:58:10 +0000 |
| commit | cfcb0b09a4c7cff7274c3b329d4dc27f192b7434 (patch) | |
| tree | 69f31fb7c2575f627b6b6f22d7f6c5ae1ad04ab7 /t/lib | |
| parent | 431d98c2031fccd9ea4057d71a9383bc5c187f4e (diff) | |
| download | perl-cfcb0b09a4c7cff7274c3b329d4dc27f192b7434.tar.gz | |
Temp file cleanliness.
p4raw-id: //depot/cfgperl@4267
Diffstat (limited to 't/lib')
| -rwxr-xr-x | t/lib/filecopy.t | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/t/lib/filecopy.t b/t/lib/filecopy.t index e461595d9b..7ef68eb02b 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-$$"; +} |