summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPeter Prymmer <PPrymmer@factset.com>2000-08-18 10:54:10 -0700
committerJarkko Hietaniemi <jhi@iki.fi>2000-08-19 14:09:19 +0000
commit92e5451f6c185840d54cb52c79f90b7f2cad6b74 (patch)
tree9546856bbca95312c60816cad940890ffd810ace
parente8d3aa3b2e7edcd352aa3e0d8a884844f9aa9d5e (diff)
downloadperl-92e5451f6c185840d54cb52c79f90b7f2cad6b74.tar.gz
tidy up the temp files left by peek tests on VMS
Message-ID: <Pine.OSF.4.10.10008181751350.322420-100000@aspara.forte.com> cc: vmsperl@perl.org p4raw-id: //depot/perl@6711
-rw-r--r--t/lib/peek.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/peek.t b/t/lib/peek.t
index b51287a346..7eed46d3ab 100644
--- a/t/lib/peek.t
+++ b/t/lib/peek.t
@@ -308,5 +308,5 @@ do_test(17,
EGV = $ADDR\\t"a"');
END {
- unlink("peek$$");
+ 1 while unlink("peek$$");
}