summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2009-03-20 15:51:28 +0000
committerThierry Vignaud <tv@mandriva.org>2009-03-20 15:51:28 +0000
commit9374ff7c921a3a5810ca68383737b48ee03e527f (patch)
tree2078e40ed18b826c6cff6613e37799f365e21995 /perl-install
parent66f0becb1ce7358f2f0355c1a366ceeb2759b662 (diff)
downloaddrakx-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.pm7
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