ext/FileCache/t/ - fixup paralleism issues in tests

[perl5.git] / ext / FileCache / t / 04twoarg.t

diff --git a/ext/FileCache/t/04twoarg.t b/ext/FileCache/t/04twoarg.t
index 0189c46..da42f32 100644 (file)
--- a/ext/FileCache/t/04twoarg.t
+++ b/ext/FileCache/t/04twoarg.t
@@ -2,16 +2,16 @@
 
 use FileCache;
 
-END { unlink('foo') }
+END { unlink('foo_2arg') }
 
 use Test::More tests => 1;
 
 {# Test 4: that 2 arg format works, and that we cycle on mode change
-     cacheout '>', "foo";
-     print foo "foo 4\n";
-     cacheout '+>', "foo";
-     print foo "foo 44\n";
-     seek(foo, 0, 0);
-     ok(<foo> eq "foo 44\n");
-     close foo;
+     cacheout '>', "foo_2arg";
+     print foo_2arg "foo 4\n";
+     cacheout '+>', "foo_2arg";
+     print foo_2arg "foo 44\n";
+     seek(foo_2arg, 0, 0);
+     ok(<foo_2arg> eq "foo 44\n");
+     close foo_2arg;
 }