diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-01-03 15:39:31 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-01-03 15:39:31 +0000 |
| commit | ed66511b2f3586fab70a7f125f8e4a411aac8afe (patch) | |
| tree | 51d50fd3373c0440c9db8ef87bbf85523e8eb48b /perl-install | |
| parent | 5c182d7f50c4e5071e2283007351a2baa5bb847c (diff) | |
| download | drakx-ed66511b2f3586fab70a7f125f8e4a411aac8afe.tar drakx-ed66511b2f3586fab70a7f125f8e4a411aac8afe.tar.gz drakx-ed66511b2f3586fab70a7f125f8e4a411aac8afe.tar.bz2 drakx-ed66511b2f3586fab70a7f125f8e4a411aac8afe.tar.xz drakx-ed66511b2f3586fab70a7f125f8e4a411aac8afe.zip | |
Make do_pkgs::install() return the number of packages actually installed
(used by printerdrake, apparently)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index e139b4b64..adf143f55 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -404,6 +404,7 @@ sub beforeInstallPackages { install_any::getAndSaveFile("install/oem-theme.rpm", "$o->{prefix}/usr/share/oem-theme.rpm"); } +#- returns number of packages installed, 0 if none were selected. sub pkg_install { my ($o, @l) = @_; log::l("selecting packages " . join(" ", @l)); @@ -420,6 +421,7 @@ sub pkg_install { $o->installPackages; } else { log::l("all packages selected are already installed, nothing to do"); + 0; } } |