diff --git a/Makefile.PL b/Makefile.PL index 0f16594..261a4aa 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -14,5 +14,8 @@ my %param = ( ); $param{NO_META} = 1 if eval "$ExtUtils::MakeMaker::VERSION" >= 6.10_03; $param{LIBS} = ['-L/lib/w32api -lole32 -lversion'] if $^O eq "cygwin"; +$param{dynamic_lib} = + {OTHERLDFLAGS => '-DELAYLOAD:ole32.dll -DELAYLOAD:version.dll delayimp.lib'} + if $Config::Config{cc} =~ /cl/; WriteMakefile(%param); diff --git a/Win32.pm b/Win32.pm index 7b9ab45..230f85b 100644 --- a/Win32.pm +++ b/Win32.pm @@ -5,9 +5,9 @@ package Win32; use vars qw|$VERSION $XS_VERSION @ISA @EXPORT @EXPORT_OK|; require Exporter; - require DynaLoader; + require XSLoader; - @ISA = qw|Exporter DynaLoader|; + @ISA = qw|Exporter|; $VERSION = '0.52'; $XS_VERSION = $VERSION; $VERSION = eval $VERSION; @@ -647,7 +647,7 @@ sub _GetOSName { # "no warnings 'redefine';" doesn't work for 5.8.7 and earlier local $^W = 0; -bootstrap Win32; +XSLoader::load('Win32'); 1;