[Pkg-cli-common-commits] [SCM] cli-common branch, master, updated. debian/0.7.1-12-ge9fac7a

Christopher James Halse Rogers raof at ubuntu.com
Tue Apr 5 21:08:05 UTC 2011


The following commit has been merged in the master branch:
commit ed1910792b55faba99935d160c1e24db742168db
Author: Christopher James Halse Rogers <raof at ubuntu.com>
Date:   Wed Feb 10 09:43:26 2010 +1100

    Whitespace fixes: Indent=>2 spaces, no tabs

diff --git a/dh_clideps b/dh_clideps
index d50482b..7de434c 100755
--- a/dh_clideps
+++ b/dh_clideps
@@ -243,7 +243,7 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
   use File::Spec;
   my @exclude_dirs = ();
   foreach(@{$dh{EXCLUDE}}) {
-      push(@exclude_dirs, File::Spec->catdir($tmp, $_));
+    push(@exclude_dirs, File::Spec->catdir($tmp, $_));
   }
   $needs_net_1_0 = 0;
   $needs_net_2_0 = 0;
@@ -264,10 +264,10 @@ foreach my $package (@{$dh{DOPACKAGES}}) {
     }
 
     foreach(@exclude_dirs) {
-	if($File::Find::dir =~ m/^$_/) {
-	    verbose_print("Excluding module $file from dir $File::Find::dir");
-	    return;
-	}
+      if($File::Find::dir =~ m/^$_/) {
+        verbose_print("Excluding module $file from dir $File::Find::dir");
+        return;
+      }
     }
     verbose_print("Package: $package Assembly: $file");
         
@@ -634,24 +634,24 @@ sub resolveShlibRefs {
        # for DLL maps that have an unversioned library as target
        $pkgref = $shlibdata{$target.".0"};
      } else {
-	 if(!resolvePrivateLibrary($package, $fullTarget, $package)) {
-	     # Private library can't be found in the current package.  Try to resolve it
-	     # in the other binary packages, and add a strong dependency if we find it.
-	     foreach my $binary_package (@{$dh{DOPACKAGES}}) {
-		 if(resolvePrivateLibrary($package, $fullTarget, $binary_package)) {
-		     verbose_print("Found private library in $binary_package");
-		     $pkgref = $binary_package . " (= \${binary:Version})";
-		     verbose_print("pkgref is $pkgref");
-		     last;
-		 }
-	     }
-	     if (!defined($pkgref)) {
-		 error("Missing shlibs entry: $target or $name for: $assembly_filename!");
-	     }
-	 } else {
-	     verbose_print("Found private library $target for $name");
-	     next;
-	 }
+       if(!resolvePrivateLibrary($package, $fullTarget, $package)) {
+         # Private library can't be found in the current package.  Try to resolve it
+         # in the other binary packages, and add a strong dependency if we find it.
+         foreach my $binary_package (@{$dh{DOPACKAGES}}) {
+           if(resolvePrivateLibrary($package, $fullTarget, $binary_package)) {
+             verbose_print("Found private library in $binary_package");
+             $pkgref = $binary_package . " (= \${binary:Version})";
+             verbose_print("pkgref is $pkgref");
+             last;
+           }
+         }
+         if (!defined($pkgref)) {
+           error("Missing shlibs entry: $target or $name for: $assembly_filename!");
+         }
+       } else {
+         verbose_print("Found private library $target for $name");
+         next;
+       }
      }
 
      my %overriddenRef = resolveOverride($package, $pkgref);
@@ -665,35 +665,35 @@ sub resolveShlibRefs {
 }
 
 sub resolvePrivateLibrary {
-    my $package = shift;
-    my $target = shift;
-    my $resolveIn = shift;
-    my $library_file;
-
-    use File::Spec;
-    if (File::Spec->file_name_is_absolute($target)) {
-	# If the DLLMap target is absolute, we should check that the target
-	# exists in that location.  Since we're currently in the directory
-	# with the assembly, we need to back out first.
-	my @targetDirs = File::Spec->splitdir($target);
-	my @cwdComponents = File::Spec->splitdir(File::Spec->rel2abs(File::Spec->curdir()));
-	my @upDirs = ("../", "../");
-
-	# Find where the last occurance of tmpdir is in $curdir, and add enough
-	# updirs to get there from cwd.
-	while(join("/", ($cwdComponents[-2], $cwdComponents[-1])) ne tmpdir($package)) {
-	    pop(@cwdComponents);
-	    push(@upDirs, "../");
-	}
-
-	$library_file = File::Spec->rel2abs(File::Spec->catdir((File::Spec->curdir(), @upDirs, tmpdir($resolveIn), @targetDirs)));
-    } else {
-	# If the DLLMap target is not absolute, look in the same directory
-	# as the assembly.
-	$library_file = basename($target);
+  my $package = shift;
+  my $target = shift;
+  my $resolveIn = shift;
+  my $library_file;
+
+  use File::Spec;
+  if (File::Spec->file_name_is_absolute($target)) {
+    # If the DLLMap target is absolute, we should check that the target
+    # exists in that location.  Since we're currently in the directory
+    # with the assembly, we need to back out first.
+    my @targetDirs = File::Spec->splitdir($target);
+    my @cwdComponents = File::Spec->splitdir(File::Spec->rel2abs(File::Spec->curdir()));
+    my @upDirs = ("../", "../");
+
+    # Find where the last occurance of tmpdir is in $curdir, and add enough
+    # updirs to get there from cwd.
+    while(join("/", ($cwdComponents[-2], $cwdComponents[-1])) ne tmpdir($package)) {
+      pop(@cwdComponents);
+      push(@upDirs, "../");
     }
-    verbose_print("Looking for $target at $library_file");
-    return 1 if -f $library_file || -s $library_file;
+
+    $library_file = File::Spec->rel2abs(File::Spec->catdir((File::Spec->curdir(), @upDirs, tmpdir($resolveIn), @targetDirs)));
+  } else {
+    # If the DLLMap target is not absolute, look in the same directory
+    # as the assembly.
+    $library_file = basename($target);
+  }
+  verbose_print("Looking for $target at $library_file");
+  return 1 if -f $library_file || -s $library_file;
 }
 
 =head1 SEE ALSO

-- 
cli-common



More information about the Pkg-cli-common-commits mailing list