r475: * dh_gencontrol: Added a documented interface for specifying substvars

[debhelper.git] / dh_shlibdeps

diff --git a/dh_shlibdeps b/dh_shlibdeps
index ebba4746a26132858ae87564b6b9451603863538..f9199c3f46f2bb48df15333c7a0fdbaa78b29f0a 100755 (executable)
--- a/dh_shlibdeps
+++ b/dh_shlibdeps
@@ -55,6 +55,26 @@ dpkg-shlibdeps.
 
 init();
 
+# Add directory to library search path.
+if ($dh{L_PARAMS}) {
+       my @paths=();
+       # Add to existing paths, if set.
+       push @paths, $ENV{'LD_LIBRARY_PATH'}
+               if exists $ENV{'LD_LIBRARY_PATH'};
+       foreach (split(/:/, $dh{L_PARAMS})) {
+               # Force the path absolute.
+               if (m:^/:) {
+                       push @paths, $_;
+               }
+               else {
+                       push @paths, getcwd()."/$_";
+               }
+       }
+       $dh{L_PARAMS}=join(':', @paths);
+       $ENV{'LD_LIBRARY_PATH'}=$dh{L_PARAMS};
+       verbose_print("LD_LIBRARY_PATH=$dh{L_PARAMS}");
+}
+
 foreach my $package (@{$dh{DOPACKAGES}}) {
        my $tmp=tmpdir($package);
        my $ext=pkgext($package);
@@ -77,25 +97,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
        }
 
        if (@filelist) {
-               if ($dh{L_PARAMS}) {
-                       my @paths=();
-                       # Add to existing paths, if set.
-                       push @paths, $ENV{'LD_LIBRARY_PATH'}
-                               if exists $ENV{'LD_LIBRARY_PATH'}
-                       foreach (split(/:/, $dh{L_PARAMS})) {
-                               # Force the path absolute.
-                               if (m:^/:) {
-                                       push @paths, $_;
-                               }
-                               else {
-                                       push @paths, getcwd()."/$_";
-                               }
-                       }
-                       $dh{L_PARAMS}=join(':', @paths);
-                       $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);
+               doit("dpkg-shlibdeps","-Tdebian/${ext}substvars.debhelper",@{$dh{U_PARAMS}},'-dDepends',@filelist);
        }
 }