X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git;a=blobdiff_plain;f=Makefile.PL;h=52a9d4043f2cb71d7aa89b325e7b0a8cd4c6cec2;hp=3860b5517b26ea2011c94e2374082b42b7a131a5;hb=515346d5652e6f39bd6329463e4b0245d5368902;hpb=52f4d61f228f6e76a229b389c897932d2b5c3e62

diff --git a/Makefile.PL b/Makefile.PL
index 3860b55..52a9d40 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -35,7 +35,16 @@ if ($^O eq 'MSWin32' and not grep /^LD[A-Z]*=/, @ARGV) {
                   @Config{qw<bin sitebin>};
   $macro{LDDLFLAGS}    = "$lddlflags $libdirs $libperl";
   $macro{LDFLAGS}      = "$ldflags $libdirs $libperl";
-  $macro{PERL_ARCHIVE} = '',
+  eval <<'  MY_SECTION';
+   package MY;
+   sub dynamic_lib {
+    my $self = shift;
+    my $inherited = $self->SUPER::dynamic_lib(@_);
+    $inherited =~ s/"?\$\(PERL_ARCHIVE\)"?//g;
+    return $inherited;
+   }
+  MY_SECTION
+  die $@ if $@;
  }
 }
 print $is_gcc_34 ? "yes\n" : "no\n";