summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2002-03-04 15:01:17 +0000
committerFrancois Pons <fpons@mandriva.com>2002-03-04 15:01:17 +0000
commit97751d08657a728d2d871b2751c27c478ad25d46 (patch)
treef71179a2ba19724bd1d28d11a1a232dffbccdf63 /perl-install/pkgs.pm
parent274fe6a8db532fab2feabe4ce62ef7cf58bd1c76 (diff)
downloaddrakx-backup-do-not-use-97751d08657a728d2d871b2751c27c478ad25d46.tar
drakx-backup-do-not-use-97751d08657a728d2d871b2751c27c478ad25d46.tar.gz
drakx-backup-do-not-use-97751d08657a728d2d871b2751c27c478ad25d46.tar.bz2
drakx-backup-do-not-use-97751d08657a728d2d871b2751c27c478ad25d46.tar.xz
drakx-backup-do-not-use-97751d08657a728d2d871b2751c27c478ad25d46.zip
fix scroll total to match reality.
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 3b8033e26..bd2ad52b4 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -1304,7 +1304,7 @@ sub install($$$;$$) {
foreach my $pkg (@$toInstall) {
$packages{packageName($pkg)} = $pkg;
$nb++;
- $total += packageSize($pkg);
+ $total += to_int($pkg->[$SIZE_DEPS]); #- do not correct for upgrade!
}
log::l("pkgs::install $prefix");