r335: man page fixup

[debhelper.git] / dh_shlibdeps

diff --git a/dh_shlibdeps b/dh_shlibdeps
index cdf1356612a115577e644e4db6524fc95343e127..f6ae235ee899bf2e3288293bf71d4d8ca7f03cfb 100755 (executable)
--- a/dh_shlibdeps
+++ b/dh_shlibdeps
@@ -13,16 +13,27 @@ 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/) {
+               if ($ff=~m/ELF/ && $ff!~/statically linked/) {
                        push @filelist,$file;
                }
        }
 
+       if ($dh{L_PARAMS}) {
+               $ENV{'LD_LIBRARY_PATH'}=$dh{L_PARAMS}
+       }
+
        if (@filelist) {
-               doit("dpkg-shlibdeps","-Tdebian/$EXT\substvars",@{$dh{U_PARAMS}},@filelist);
+               doit("dpkg-shlibdeps","-Tdebian/$EXT\substvars",@{$dh{U_PARAMS}},'-dDepends',@filelist);
        }
 }