diff options
| author | Craig A. Berry <craigberry@mac.com> | 2005-01-23 08:23:17 -0600 |
|---|---|---|
| committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-01-24 15:10:55 +0000 |
| commit | 4e7ee149460a1e80f981e3148f5aa709e27ebacb (patch) | |
| tree | 3854a206443001d6bc318f386f25aa95190f85b2 /lib/Test | |
| parent | 27bcc0a7e6b15b7b0d6f632d5f31918abd005ef4 (diff) | |
| download | perl-4e7ee149460a1e80f981e3148f5aa709e27ebacb.tar.gz | |
assorted tempfile clean-up in the test suite
From: "Craig A. Berry" <craigberry@mac.com>
Message-ID: <41F407B5.7020106@mac.com>
p4raw-id: //depot/perl@23874
Diffstat (limited to 'lib/Test')
| -rw-r--r-- | lib/Test/Simple/t/reset.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Test/Simple/t/reset.t b/lib/Test/Simple/t/reset.t index bc1546bee6..320fd86a53 100644 --- a/lib/Test/Simple/t/reset.t +++ b/lib/Test/Simple/t/reset.t @@ -27,7 +27,7 @@ my $tmpfile = 'foo.tmp'; $tb->output($tmpfile); $tb->failure_output($tmpfile); $tb->todo_output($tmpfile); -END { unlink $tmpfile } +END { 1 while unlink $tmpfile } # This won't print since we just sent output off to oblivion. $tb->ok(0, "And a failure for fun"); |