summaryrefslogtreecommitdiffstats
path: root/perl-install/pkgs.pm
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2003-08-05 14:11:02 +0000
committerFrancois Pons <fpons@mandriva.com>2003-08-05 14:11:02 +0000
commit21b1fc00b47b7e87f71506f0ddbc367456f3f270 (patch)
tree6a0a6ff682d68628f92f5ab14f623a23137abaca /perl-install/pkgs.pm
parentf0e226d2ee9b2a3b2cf122d4be445f9920fef59e (diff)
downloaddrakx-21b1fc00b47b7e87f71506f0ddbc367456f3f270.tar
drakx-21b1fc00b47b7e87f71506f0ddbc367456f3f270.tar.gz
drakx-21b1fc00b47b7e87f71506f0ddbc367456f3f270.tar.bz2
drakx-21b1fc00b47b7e87f71506f0ddbc367456f3f270.tar.xz
drakx-21b1fc00b47b7e87f71506f0ddbc367456f3f270.zip
checking transaction allow ordering them ;-)
Diffstat (limited to 'perl-install/pkgs.pm')
-rw-r--r--perl-install/pkgs.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/pkgs.pm b/perl-install/pkgs.pm
index 8d1c07023..6d8d74c03 100644
--- a/perl-install/pkgs.pm
+++ b/perl-install/pkgs.pm
@@ -998,7 +998,8 @@ sub install($$$;$$) {
foreach @transToInstall;
}
- #$trans->order or die "error ordering package list: " . c::rpmErrorString();
+ my @checks = $trans->check; @checks and log::l("check failed : ".join("\n ", @checks));
+ $trans->order or die "error ordering package list: " . c::rpmErrorString();
$trans->set_script_fd(fileno $LOG);
log::l("rpm transactions start");