summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--NEWS2
-rwxr-xr-xurpmq9
2 files changed, 5 insertions, 6 deletions
diff --git a/NEWS b/NEWS
index 75f5ca8e..1d8a1b1a 100644
--- a/NEWS
+++ b/NEWS
@@ -18,6 +18,8 @@
o always prompt before doing a priority-upgrade transaction, even if there
is only one priority upgrade package (since there will be more packages to
install after restarting urpmi)
+- urpmq:
+ o use URPM::Package->changelogs (need perl-URPM 3.06)
Version 4.10.19 - 12 December 2007, by Pascal "Pixel" Rigaux
diff --git a/urpmq b/urpmq
index 8e05cde6..345548c4 100755
--- a/urpmq
+++ b/urpmq
@@ -406,12 +406,9 @@ if ($options{list_aliases}) {
}
}
if ($options{changelog}) {
- if ($pkg->changelog_time && $pkg->changelog_name && $pkg->changelog_text) {
- my @ti = $pkg->changelog_time;
- my @na = $pkg->changelog_name;
- my @tx = $pkg->changelog_text;
- foreach my $i (0 .. $#ti) {
- print "* " . urpm::msg::localtime2changelog($ti[$i]) . " $na[$i]\n$tx[$i]\n\n";
+ if (my @changelogs = $pkg->changelogs) {
+ foreach (@changelogs) {
+ print "* " . urpm::msg::localtime2changelog($_->{time}) . " $_->{name}\n$_->{text}\n\n";
}
} else {
print STDERR N("No changelog found\n");