skip all tests in t/links.t for OSes that can't symlink

fix for RT #57682
briandfoy · Feb 12, 2012 · fc9049b · fc9049b
1 parent 2abe885
commit fc9049b
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/t/links.t b/t/links.t
@@ -5,10 +5,11 @@ use Test::More tests => 37;
 use Test::File;
 
 my $can_symlink = eval { symlink("",""); 1 };
+plan skip_all => "This system does't do symlinks" unless $can_symlink;
 
 my $test_directory = 'test_files';
 SKIP: {
-    skip "This system does't do symlinks", 5 unless $can_symlink;
+    skip "setup already done", 5 if -d $test_directory;
     require "t/setup_common";
 };