summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/fileshareset
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2004-09-28 02:25:23 +0000
committerPascal Rigaux <pixel@mandriva.com>2004-09-28 02:25:23 +0000
commit87ee25a82bc6b17ff1d08eb5f21a1c149dc3a28a (patch)
tree2b4cf1415f9893cf105b691f9127af5232b2246e /perl-install/standalone/fileshareset
parent82ab154cc91bc4d2ceff3a207d119058d7d18454 (diff)
downloaddrakx-87ee25a82bc6b17ff1d08eb5f21a1c149dc3a28a.tar
drakx-87ee25a82bc6b17ff1d08eb5f21a1c149dc3a28a.tar.gz
drakx-87ee25a82bc6b17ff1d08eb5f21a1c149dc3a28a.tar.bz2
drakx-87ee25a82bc6b17ff1d08eb5f21a1c149dc3a28a.tar.xz
Diffstat (limited to 'p- make printer::printerdrake::install_spooler() work with an optional $in
- many functions now take $security (which used to be taken from $in during install) - fix some functions with empty prototype but still using a parameter - remove some unused variable - rename some $_foo vars to $foo since those vars are used - add some undef to some function calls to be minimally perl_checker compliant - perl_checker compliant optional parameters in start_spooler_on_boot(), install_spooler()
Diffstat (limited to 'perl-install/standalone/fileshareset')
0 files changed, 0 insertions, 0 deletions
'hunk'>@@ -453,14 +453,10 @@ sub choosePackagesTree {
};
my $update_size = sub {
- my $size = 0;
- foreach (values %{$packages->[0]}) {
- $size += pkgs::packageSize($_) - ($_->{installedCumulSize} || 0) if pkgs::packageFlagSelected($_); #- on upgrade, installed packages will be removed.
- }
+ my $size = pkgs::selectedSize();
$w_size->set(_("Total size: %d / %d MB",
pkgs::correctSize($size / sqr(1024)),
install_any::getAvailableSpace($o) / sqr(1024)));
-
};
my $toggle = sub {
if (ref $curr) {