From eb58e468715616cf3f7f2255dcc9698a44beb08e Mon Sep 17 00:00:00 2001 From: Steve McIntyre <93sam@debian.org> Date: Wed, 26 Nov 2008 23:42:05 +0000 Subject: [PATCH] Fix tab damage from last checkin --- tools/make_disc_trees.pl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/tools/make_disc_trees.pl b/tools/make_disc_trees.pl index def3e477..50c25d82 100755 --- a/tools/make_disc_trees.pl +++ b/tools/make_disc_trees.pl @@ -306,7 +306,7 @@ sub load_packages_cache { my $arch = shift; my @pkglist; my ($p); - my $num_pkgs = 0; + my $num_pkgs = 0; $ENV{'LC_ALL'} = 'C'; # Required since apt is now translated $ENV{'ARCH'} = $arch; @@ -321,7 +321,7 @@ sub load_packages_cache { } close INLIST; - print "Reading in package information for $arch:\n"; + print "Reading in package information for $arch:\n"; $/ = ''; # Browse by paragraph while (@pkglist) { @@ -336,13 +336,13 @@ sub load_packages_cache { while (defined($_ = )) { m/^Package: (\S+)/m and $p = $1; $pkginfo{$arch}{$p} = $_; - $num_pkgs++; + $num_pkgs++; } - close LIST; - print LOG "load_packages_cache: Read details of $num_pkgs packages for $arch\n"; + close LIST; + print LOG "load_packages_cache: Read details of $num_pkgs packages for $arch\n"; } $/ = $old_split; # Browse by line again - print " Done: Read details of $num_pkgs packages for $arch\n"; + print " Done: Read details of $num_pkgs packages for $arch\n"; } sub should_start_extra_nonfree {