summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2007-08-23 14:11:33 +0000
committerPascal Rigaux <pixel@mandriva.com>2007-08-23 14:11:33 +0000
commit0f0b6d87fbb3e83a70d5b9825c3ba4de211f2101 (patch)
tree9557f125c186ea34c91ad6cc1f25df1fe12d6adf
parentb64ea0c14bc81335b2a654d8adcbbd1dffaca804 (diff)
downloadurpmi-0f0b6d87fbb3e83a70d5b9825c3ba4de211f2101.tar
urpmi-0f0b6d87fbb3e83a70d5b9825c3ba4de211f2101.tar.gz
urpmi-0f0b6d87fbb3e83a70d5b9825c3ba4de211f2101.tar.bz2
urpmi-0f0b6d87fbb3e83a70d5b9825c3ba4de211f2101.tar.xz
urpmi-0f0b6d87fbb3e83a70d5b9825c3ba4de211f2101.zip
display computed transaction set in debug mode
-rw-r--r--urpm/install.pm14
1 files changed, 14 insertions, 0 deletions
diff --git a/urpm/install.pm b/urpm/install.pm
index ef06919a..28726b0c 100644
--- a/urpm/install.pm
+++ b/urpm/install.pm
@@ -53,6 +53,20 @@ sub build_transaction_set_ {
#- build transaction set...
$urpm->build_transaction_set($db, $state, split_length => $options{split_length});
}
+
+ $urpm->{debug} and $urpm->{debug}(join("\n", "scheduled sets of transactions:",
+ transaction_set_to_string($urpm, $state->{transaction} || [])));
+}
+
+sub transaction_set_to_string {
+ my ($urpm, $set) = @_;
+
+ map {
+ sprintf('remove=%s install=%s update=%s',
+ join(',', @{$_->{remove} || []}),
+ join(',', map { $urpm->{depslist}[$_]->name } @{$_->{install} || []}),
+ join(',', map { $urpm->{depslist}[$_]->name } @{$_->{upgrade} || []}));
+ } @$set;
}
# install logger callback