Integrate mainline

[p5sagit/p5-mst-13.2.git] / t / base / commonsense.t

diff --git a/t/base/commonsense.t b/t/base/commonsense.t
index 155c534..6e31307 100644 (file)
--- a/t/base/commonsense.t
+++ b/t/base/commonsense.t
@@ -15,7 +15,8 @@ if (($Config{'extensions'} !~ /\bIO\b/) ){
   print "Bail out! Perl configured without IO module\n";
   exit 0;
 }
-if (($Config{'extensions'} !~ /\bFile\/Glob\b/) ){
+# hey, DOS users do not need this kind of common sense ;-)
+if ($^O ne 'dos' && ($Config{'extensions'} !~ /\bFile\/Glob\b/) ){
   print "Bail out! Perl configured without File::Glob module\n";
   exit 0;
 }