r374: * Rebuild to remove cvs junk, Closes: #72610

[debhelper.git] / dh_shlibdeps

diff --git a/dh_shlibdeps b/dh_shlibdeps
index 1268fa4a4f569ff50b55086b0b8348ea94dd554b..237d92db5a0dbb648fd1e7819dc86df1ce6643f1 100755 (executable)
--- a/dh_shlibdeps
+++ b/dh_shlibdeps
@@ -2,8 +2,7 @@
 #
 # Find dependancies. Simple dpkg-shlibdeps wrapper.
 
-BEGIN { push @INC, "debian", "/usr/share/debhelper" }
-use Dh_Lib;
+use Debian::Debhelper::Dh_Lib;
 init();
 
 foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
@@ -13,8 +12,15 @@ foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
        my @filelist;
        my $ff;
 
-       # Generate a list of all ELF binaries in the package.
-       foreach $file (split(/\n/,`find $TMP -type f \\( -perm +111 -or -name "*.so*" \\)`)) {
+       # Generate a list of ELF binaries in the package, ignoring any
+       # we were told to exclude.
+       if (! defined($dh{EXCLUDE_FIND}) || $dh{EXCLUDE_FIND} eq '') {
+               $find_options="";
+       }
+       else {
+               $find_options="! \\( $dh{EXCLUDE_FIND} \\)";
+       }
+       foreach $file (split(/\n/,`find $TMP -type f \\( -perm +111 -or -name "*.so*" \\) $find_options`)) {
                # TODO: this is slow, optimize. Ie, file can run once on multiple files..
                $ff=`file "$file"`;
                if ($ff=~m/ELF/ && $ff!~/statically linked/) {
@@ -23,6 +29,10 @@ foreach $PACKAGE (@{$dh{DOPACKAGES}}) {
        }
 
        if (@filelist) {
-               doit("dpkg-shlibdeps","-Tdebian/$EXT\substvars",@{$dh{U_PARAMS}},@filelist);
+               if ($dh{L_PARAMS}) {
+                       $ENV{'LD_LIBRARY_PATH'}=$dh{L_PARAMS};
+                       verbose_print("LD_LIBRARY_PATH=$dh{L_PARAMS} \\");
+               }
+               doit("dpkg-shlibdeps","-Tdebian/${EXT}substvars",@{$dh{U_PARAMS}},'-dDepends',@filelist);
        }
 }