Re: File/Spec/t/rel2abs2rel2whatever broken again

[p5sagit/p5-mst-13.2.git] / lib / File / Spec.pm

diff --git a/lib/File/Spec.pm b/lib/File/Spec.pm
index 9d9d5b6..529e34f 100644 (file)
--- a/lib/File/Spec.pm
+++ b/lib/File/Spec.pm
@@ -10,18 +10,13 @@ my %module = (MacOS   => 'Mac',
              os2     => 'OS2',
              VMS     => 'VMS',
              epoc    => 'Epoc',
+             NetWare => 'Win32', # Yes, File::Spec::Win32 works on NetWare.
+              dos     => 'OS2',   # Yes, File::Spec::OS2 works on DJGPP.
              cygwin  => 'Cygwin');
 
 
 my $module = $module{$^O} || 'Unix';
 
-if ($^O eq 'MSWin32') {
-    require Config;
-    if ($Config::Config{osname} eq 'NetWare') {
-       $module = 'NW5';
-    }
-}
-
 require "File/Spec/$module.pm";
 @ISA = ("File::Spec::$module");