diff options
author | Thierry Vignaud <tv@mandriva.org> | 2009-03-20 15:51:28 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2009-03-20 15:51:28 +0000 |
commit | 9374ff7c921a3a5810ca68383737b48ee03e527f (patch) | |
tree | 2078e40ed18b826c6cff6613e37799f365e21995 /perl-install | |
parent | 66f0becb1ce7358f2f0355c1a366ceeb2759b662 (diff) | |
download | drakx-9374ff7c921a3a5810ca68383737b48ee03e527f.tar drakx-9374ff7c921a3a5810ca68383737b48ee03e527f.tar.gz drakx-9374ff7c921a3a5810ca68383737b48ee03e527f.tar.bz2 drakx-9374ff7c921a3a5810ca68383737b48ee03e527f.tar.xz drakx-9374ff7c921a3a5810ca68383737b48ee03e527f.zip |
(_install_raw::close_helper) make it more readable
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install/pkgs.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/install/pkgs.pm b/perl-install/install/pkgs.pm index 046b44b09..0947d14e5 100644 --- a/perl-install/install/pkgs.pm +++ b/perl-install/install/pkgs.pm @@ -748,8 +748,11 @@ sub _install_raw { install::pkgs::setup_rpm_summary_translations(); } - $check_installed or log::l($pkg->name . " not installed, " . URPM::rpmErrorString()); - $check_installed and _unselect_package($packages, $pkg); + if ($check_installed) { + _unselect_package($packages, $pkg); + } else { + log::l($pkg->name . " not installed, " . URPM::rpmErrorString()); + } }, inst => $callback, trans => $callback, # FIXME: implement already_installed_or_not_installable |