From 0ed66231cb182f36611444dbd643ad5dbd7e2c1c Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tv@mandriva.org>
Date: Fri, 8 Feb 2008 16:02:14 +0000
Subject: (format_changelog_changelogs) factorize formatting unlocalized
 changelogs

---
 Rpmdrake/formatting.pm | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'Rpmdrake/formatting.pm')

diff --git a/Rpmdrake/formatting.pm b/Rpmdrake/formatting.pm
index 3b987c67..29f187ea 100644
--- a/Rpmdrake/formatting.pm
+++ b/Rpmdrake/formatting.pm
@@ -35,6 +35,7 @@ use Exporter;
 our @ISA = qw(Exporter);
 our @EXPORT = qw(
                     $spacing
+                    format_changelog_changelogs
                     format_changelog_string
                     format_field
                     format_header
@@ -101,6 +102,13 @@ sub format_changelog_string {
     [ map { [ "$spacing$_\n", if_(/^\*/, { 'weight' => Gtk2::Pango->PANGO_WEIGHT_BOLD }) ] } split("\n", $_[0]) ];
 }
 
+sub format_changelog_changelogs {
+    my (@changelogs) = @_;
+    format_changelog_string(join("\n", map {
+        "* " . localtime2changelog($_->{time}) . " $_->{name}\n\n$_->{text}\n";
+    } @changelogs));
+}
+
 sub format_update_field {
     my ($name) = @_;
     '<i>' . eval { escape_text_for_TextView_markup_format($name) } . '</i>';
-- 
cgit v1.2.1