Test tweak to avoid pulling in the whole Config.

p4raw-id: //depot/perl@7423

diff --git a/t/lib/st-lock.t b/t/lib/st-lock.t
index 80a7d2c..21d2b67 100644 (file)
--- a/t/lib/st-lock.t
+++ b/t/lib/st-lock.t
@@ -13,13 +13,6 @@
 #
 #
 
-use Config;
-
-if ($Config{'osname'} eq 'dos') {
-       print "1..0 # Skip: fcntl/flock emulation broken on this platform\n";
-       exit 0;
-}
-
 sub BEGIN {
     chdir('t') if -d 't';
     @INC = '.'; 
@@ -33,6 +26,10 @@ sub BEGIN {
         print "1..0 # Skip: no flock or flock emulation on this platform\n";
         exit 0;
     }
+    if ($^O eq 'dos') {
+       print "1..0 # Skip: fcntl/flock emulation broken on this platform\n";
+       exit 0;
+    }
     require 'lib/st-dump.pl';
 }