Subject: | (MSWin32) Handle correctly situation when $Config{dlext} is not equal to 'dll' |
Hi,
in the coming strawberry perl 5.20.x series I am gonna switch $Config{dlext} to 'xs.dll' which unfortunately breaks Prima.
Please consider the following patch
in the coming strawberry perl 5.20.x series I am gonna switch $Config{dlext} to 'xs.dll' which unfortunately breaks Prima.
Please consider the following patch
--- Prima-1.38_orig/Makefile.PL 2014-01-02 14:06:50.000000000 +0100 +++ Prima-1.38/Makefile.PL 2014-04-15 23:29:32.126336100 +0200 @@ -1816,7 +1816,7 @@ cleanup("Error copying $_ to $_") unless copy $_, $f; } if ($^O eq 'cygwin') { - system "strip $DISTNAME/auto/Prima/Prima.dll" ; # it's 27 MB! + system "strip $DISTNAME/auto/Prima/Prima.$Config{dlext}" ; # it's 27 MB! if ( $] > 5.010 ) { $cygwin_fake_Slib = 'SlibPrima' . ( $Config{lib_ext} || '.a' ); open F, '>', "$DISTNAME/auto/Prima/$cygwin_fake_Slib"; @@ -1976,7 +1976,7 @@ my $t = $self->SUPER::dynamic_lib(@_); if ( $win32_use_dlltool ) { my $lib = qd("blib/arch/auto/Prima/${LIB_PREFIX}Prima$LIB_EXT"); - my $line = "\t$win32_use_dlltool -l $lib -d Prima.def -D PRIMA.DLL \$\@\n"; + my $line = "\t$win32_use_dlltool -l $lib -d Prima.def -D PRIMA.$Config{dlext} \$\@\n"; $END .= <<BAD_MAKEFILE unless $t =~ s/(^\$\(INST_DYNAMIC\)\:.*?\n(?:\t.*?\n)*)/$1$line/m;