diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2004-09-28 02:25:23 +0000 | |
---|---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2004-09-28 02:25:23 +0000 | |
commit | 87ee25a82bc6b17ff1d08eb5f21a1c149dc3a28a (patch) | ||
tree | 2b4cf1415f9893cf105b691f9127af5232b2246e /perl-install/standalone/fileshareset | ||
parent | 82ab154cc91bc4d2ceff3a207d119058d7d18454 (diff) | ||
download | drakx-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 }; 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) { |