This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
954b0be
)
Change 30276 wasn't meant do mess with t/lib/common.pl. Oops.
author
Nicholas Clark
<nick@ccl4.org>
Wed, 14 Feb 2007 00:04:54 +0000
(
00:04
+0000)
committer
Nicholas Clark
<nick@ccl4.org>
Wed, 14 Feb 2007 00:04:54 +0000
(
00:04
+0000)
Undo the mistake.
p4raw-id: //depot/perl@30277
t/lib/common.pl
patch
|
blob
|
blame
|
history
diff --git
a/t/lib/common.pl
b/t/lib/common.pl
index
2cba490
..
36d45f3
100644
(file)
--- a/
t/lib/common.pl
+++ b/
t/lib/common.pl
@@
-16,8
+16,8
@@
$| = 1;
my $Is_MacOS = $^O eq 'MacOS';
my $tmpfile = "tmp0000";
-
#
1 while -e ++$tmpfile;
-
#
END { 1 while unlink $tmpfile }
+1 while -e ++$tmpfile;
+END { 1 while unlink $tmpfile }
my @prgs = () ;
my @w_files = () ;