Remove duplicately applied patch shards.

[p5sagit/p5-mst-13.2.git] / t / lib / st-store.t

diff --git a/t/lib/st-store.t b/t/lib/st-store.t
index 19f6ddf..dd14617 100644 (file)
--- a/t/lib/st-store.t
+++ b/t/lib/st-store.t
@@ -14,12 +14,12 @@
 
 sub BEGIN {
     chdir('t') if -d 't';
+    unshift @INC, '../lib';
     require Config; import Config;
     if ($Config{'extensions'} !~ /\bStorable\b/) {
         print "1..0 # Skip: Storable was not built\n";
         exit 0;
     }
-    unshift @INC, '../lib';
     require 'lib/st-dump.pl';
 }
 
@@ -52,7 +52,7 @@ print "ok 4\n";
 print "not " unless $got eq $dumped; 
 print "ok 5\n";
 
-unlink 'store';
+1 while unlink 'store';
 
 package FOO; @ISA = qw(Storable);
 
@@ -114,6 +114,6 @@ print "not " unless $@;
 print "ok 20\n";
 
 close OUT;
-END { unlink 'store' }
+END { 1 while unlink 'store' }