Remove Win9x hangover from win32/config_sh.PL

[perl5.git] / win32 / config_sh.PL

diff --git a/win32/config_sh.PL b/win32/config_sh.PL
index ebea864..fb23ee7 100644 (file)
--- a/win32/config_sh.PL
+++ b/win32/config_sh.PL
@@ -107,12 +107,6 @@ $opt{'usemymalloc'} = 'y' if $opt{'d_mymalloc'} eq 'define';
 $opt{libpth} = mungepath($opt{libpth}) if exists $opt{libpth};
 $opt{incpath} = mungepath($opt{incpath}) if exists $opt{incpath};
 
 $opt{libpth} = mungepath($opt{libpth}) if exists $opt{libpth};
 $opt{incpath} = mungepath($opt{incpath}) if exists $opt{incpath};
 

-# some functions are not available on Win9x
-unless (defined $ENV{SYSTEMROOT}) { # SystemRoot has been introduced by WinNT
-    $opt{d_flock} = 'undef';
-    $opt{d_link} = 'undef';
-}
-

 # change the lseeksize and lseektype from their canned default values (which
 # are set-up for a non-uselargefiles build) if we are building with
 # uselargefiles.
 # change the lseeksize and lseektype from their canned default values (which
 # are set-up for a non-uselargefiles build) if we are building with
 # uselargefiles.