This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Tie::File: use unique tmp filename in 29a_upcopy.t
authorDavid Mitchell <davem@iabyn.com>
Mon, 3 Feb 2020 12:15:54 +0000 (12:15 +0000)
committerDavid Mitchell <davem@iabyn.com>
Mon, 3 Feb 2020 12:15:54 +0000 (12:15 +0000)
This is a followup to v5.31.7-92-g0a1552bada which made each Tie::File
test script use a separate prefix for its test file names. However,
there are two test files with prefixes 29_ and 29a_, and that commit
made them both use "29" for the temp file. Make it "29a" instead.

dist/Tie-File/t/29a_upcopy.t

index f23fa47..73ae3df 100644 (file)
@@ -10,7 +10,7 @@
 # but the source and destination regions may overlap.)
 
 
-my $file = "tf29-$$.txt";
+my $file = "tf29a-$$.txt";
 
 print "1..55\n";