projects
/
platform
/
upstream
/
perl.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
1795f87
)
Move @letters in test.pl earlier
author
Brad Gilbert
<b2gills@gmail.com>
Tue, 25 Sep 2012 16:39:45 +0000
(11:39 -0500)
committer
Father Chrysostomos
<sprout@cpan.org>
Tue, 25 Sep 2012 21:35:11 +0000
(14:35 -0700)
t/test.pl
patch
|
blob
|
history
diff --git
a/t/test.pl
b/t/test.pl
index
44a38dc
..
65e2348
100644
(file)
--- a/
t/test.pl
+++ b/
t/test.pl
@@
-762,6
+762,8
@@
sub unlink_all {
$count;
}
+my @letters = qw(A B C D E F G H I J K L M N O P Q R S T U V W X Y Z);
+
my %tmpfiles;
END { unlink_all keys %tmpfiles }
@@
-769,7
+771,6
@@
END { unlink_all keys %tmpfiles }
$::tempfile_regexp = 'tmp\d+[A-Z][A-Z]?';
# Avoid ++, avoid ranges, avoid split //
-my @letters = qw(A B C D E F G H I J K L M N O P Q R S T U V W X Y Z);
sub tempfile {
my $count = 0;
do {