[Reproducible-commits] [libextutils-depends-perl] 40/187: - On Cygwin, link directly against the DLLs of dependencies. Patch by Yaakov.

[Maria Valentina Marin Rodrigues]

This is an automated email from the git hooks/post-receive script.

akira-guest pushed a commit to branch pu/reproducible_builds
in repository libextutils-depends-perl.

commit 293807fd0e2a877e87ca0d3d238d10ee3797a1d1
Author: Torsten Schönfeld <tsch at src.gnome.org>
Date:   Sat Sep 6 18:11:41 2008 +0000

    	- On Cygwin, link directly against the DLLs of dependencies.  Patch by
              Yaakov.
    
    svn path=/trunk/; revision=57
---
 Changes                   | 2 ++
 lib/ExtUtils/Depends.pm   | 6 ++++--
 t/inc/DepTest/DepTest.dll | 0
 3 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/Changes b/Changes
index cf57c83..84a7c9d 100644
--- a/Changes
+++ b/Changes
@@ -1,6 +1,8 @@
 Revision history for Perl extension ExtUtils::Depends.
 
 0.xxx <date>
+	- On Cygwin, link directly against the DLLs of dependencies.  Patch by
+          Yaakov.
 	- Require perl 5.6.0.
 
 0.300 Sun Mar 30 17:35:35 CEST 2008
diff --git a/lib/ExtUtils/Depends.pm b/lib/ExtUtils/Depends.pm
index 4212bf5..9ca6c72 100644
--- a/lib/ExtUtils/Depends.pm
+++ b/lib/ExtUtils/Depends.pm
@@ -302,7 +302,7 @@ sub find_extra_libs {
 
 	my %mappers = (
 		MSWin32 => sub { $_[0] . '.lib' },
-		cygwin  => sub { 'lib' . $_[0] . '.dll.a'},
+		cygwin  => sub { $_[0] . '.dll'},
 	);
 	my $mapper = $mappers{$^O};
 	return () unless defined $mapper;
@@ -313,15 +313,17 @@ sub find_extra_libs {
 		my $lib = $mapper->($stem);
 		my $pattern = qr/$lib$/;
 
+		my $matching_dir;
 		my $matching_file;
 		find (sub {
 			if ((not $matching_file) && /$pattern/) {;
+				$matching_dir = $File::Find::dir;
 				$matching_file = $File::Find::name;
 			}
 		}, map { -d $_ ? ($_) : () } @INC); # only extant dirs
 
 		if ($matching_file && -f $matching_file) {
-			push @found_libs, $matching_file;
+			push @found_libs, ('-L' . $matching_dir, '-l' . $stem);
 			next;
 		}
 	}
diff --git a/t/inc/DepTest/DepTest.dll b/t/inc/DepTest/DepTest.dll
new file mode 100644
index 0000000..e69de29

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/reproducible/libextutils-depends-perl.git