From: Laszlo Molnar <laszlo.molnar@eth.ericsson.se>
Date: Sat, 16 Dec 2000 01:40:52 +0000 (+0100)
Subject: [patch perl@8102] dos/djgpp update
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7a06d84a010fc180b2d94db024cff7002bb60351;p=p5sagit%2Fp5-mst-13.2.git

[patch perl@8102] dos/djgpp update
Message-ID: <20001216014052.A335@freemail.hu>

p4raw-id: //depot/perl@8142
---

diff --git a/djgpp/config.over b/djgpp/config.over
index f9c167e..1bdd8ca 100644
--- a/djgpp/config.over
+++ b/djgpp/config.over
@@ -35,7 +35,9 @@ repair()
      -e 's=File/=='\
      -e 's=glob=='\
      -e 's=Glob=='\
-     -e 's/storable/Storable/'
+     -e 's/storable/Storable/'\
+     -e 's/encode/Encode/'\
+     -e 's=filter/util/call=Filter/Util/Call='
 }
 static_ext=$(repair "$static_ext")
 extensions=$(repair "$extensions")
diff --git a/t/base/commonsense.t b/t/base/commonsense.t
index 155c534..6e31307 100644
--- 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;
 }