diff options
author | Peter Prymmer <PPrymmer@factset.com> | 2000-08-18 10:54:10 -0700 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-19 14:09:19 +0000 |
commit | 92e5451f6c185840d54cb52c79f90b7f2cad6b74 (patch) | |
tree | 9546856bbca95312c60816cad940890ffd810ace | |
parent | e8d3aa3b2e7edcd352aa3e0d8a884844f9aa9d5e (diff) | |
download | perl-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.t | 2 |
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$$"); } |