From: Steve Hay <steve.m.hay@googlemail.com>
Date: Wed, 6 Jun 2012 18:17:16 +0000 (+0100)
Subject: Remove Win9x hangover from win32/config_sh.PL
X-Git-Tag: v5.17.1~237
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/2793ad9736be7d9f8d4be845ec4a4ebbc25cb516?hp=8876bcbbbc74834fd90d897e87cc5952ac1532da

Remove Win9x hangover from win32/config_sh.PL

We no longer support Win9x so there is no need to undef d_flock and d_link
in that case.
---

diff --git a/win32/config_sh.PL b/win32/config_sh.PL
index ebea864..fb23ee7 100644
--- 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};
 
-# 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.