This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
for cygwin/perlld.in
authorGerrit P. Haase <gp@familiehaase.de>
Sat, 24 May 2003 16:51:29 +0000 (18:51 +0200)
committerH.Merijn Brand <h.m.brand@xs4all.nl>
Mon, 26 May 2003 11:19:38 +0000 (11:19 +0000)
From: "Gerrit P. Haase" <gp@familiehaase.de>
Message-ID: <162265353578.20030524165129@familiehaase.de>

p4raw-id: //depot/perl@19623

cygwin/perlld.in

index b33d0e2..773bb66 100644 (file)
@@ -47,7 +47,7 @@ if ($args !~ /\-o (\S+)/) {
   }
   if ($dllname =~ /\./) { $libname =$`; } else { $libname =$dllname; };
   my $v_e_r_s = '5_9_0';
   }
   if ($dllname =~ /\./) { $libname =$`; } else { $libname =$dllname; };
   my $v_e_r_s = '5_9_0';
-  if ( $dllname =~ /.*perl.*/) { 
+  if ( $dllname =~ /libperl.*/) { 
     $dllname ="cygperl$v_e_r_s.dll";
   } else {
   $dllname ="$libname.dll";
     $dllname ="cygperl$v_e_r_s.dll";
   } else {
   $dllname ="$libname.dll";