r1655: * Added udeb support, as pioneered by di-packages-build. Understands

[debhelper.git] / dh_shlibdeps

diff --git a/dh_shlibdeps b/dh_shlibdeps
index 3fae6a6660bd22570254cead4013090c1a8f2553..c92d1bf100b9208a3cb93791c911d01c705db5f0 100755 (executable)
--- a/dh_shlibdeps
+++ b/dh_shlibdeps
@@ -55,7 +55,7 @@ a directory that contains the library. See example below.
 =item B<-L>I<package>, B<--libpackage=>I<package>
 
 Use the shlibs file automatically generated by dh_makeshlibs for the named
-package as a kind of automatically generated shlibs.local file. You can us
+package as a kind of automatically generated shlibs.local file. You can use
 this switch in concert with the -l switch to make dpkg-shlibdeps find a
 library built as part of the current package, and get the shlibs information.
 See example below.
@@ -101,6 +101,8 @@ if ($dh{L_PARAMS}) {
 }
 
 foreach my $package (@{$dh{DOPACKAGES}}) {
+       next if is_udeb($package);
+       
        my $tmp=tmpdir($package);
        my $ext=pkgext($package);
 
@@ -113,7 +115,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
        if (defined($dh{EXCLUDE_FIND}) && $dh{EXCLUDE_FIND} ne '') {
                $find_options="! \\( $dh{EXCLUDE_FIND} \\)";
        }
-       foreach my $file (split(/\n/,`find $tmp -type f \\( -perm +111 -or -name "*.so*" \\) $find_options`)) {
+       foreach my $file (split(/\n/,`find $tmp -path $tmp/usr/lib/debug -prune -or -type f \\( -perm +111 -or -name "*.so*" \\) $find_options -print`)) {
                # TODO this is slow, optimize. Ie, file can run once on
                # multiple files..
                $ff=`file "$file"`;