aboutsummaryrefslogtreecommitdiffstats
path: root/Rpmdrake/gui.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Rpmdrake/gui.pm')
-rw-r--r--Rpmdrake/gui.pm28
1 files changed, 17 insertions, 11 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm
index 2ad32c02..d0bb11c1 100644
--- a/Rpmdrake/gui.pm
+++ b/Rpmdrake/gui.pm
@@ -149,6 +149,22 @@ sub get_description {
)) };
}
+sub get_main_text {
+ my ($name, $summary, $is_update, $update_descr) = @_;
+ ugtk2::markup_to_TextView_format(
+ # force align "name - summary" to the right with RTL languages (#33603):
+ if_(lang::text_direction_rtl(), "\x{200f}") .
+ join("\n",
+ format_header(join(' - ', $name, $summary)) .
+ # workaround gtk+ bug where GtkTextView wronly limit embedded widget size to bigger line's width (#25533):
+ "\x{200b} \x{feff}" . ' ' x 120,
+ if_($is_update, # is it an update?
+ format_field(N("Importance: ")) . format_update_field($update_descr->{importance}),
+ format_field(N("Reason for update: ")) . format_update_field(rpm_description($update_descr->{pre})),
+ ),
+ '' # extra empty line
+ ));
+}
sub format_pkg_simplifiedinfo {
my ($pkgs, $key, $urpm, $descriptions) = @_;
@@ -162,17 +178,7 @@ sub format_pkg_simplifiedinfo {
# discard update fields if not matching:
my $is_update = ($upkg->flag_upgrade && $update_descr && $update_descr->{pre});
my $summary = get_summary($key);
- my $s = ugtk2::markup_to_TextView_format(
- # force align "name - summary" to the right with RTL languages (#33603):
- if_(lang::text_direction_rtl(), "\x{200f}") .
- join("\n", format_header(join(' - ', $name, $summary)) .
- # workaround gtk+ bug where GtkTextView wronly limit embedded widget size to bigger line's width (#25533):
- "\x{200b} \x{feff}" . ' ' x 120,
- if_($is_update, # is it an update?
- format_field(N("Importance: ")) . format_update_field($update_descr->{importance}),
- format_field(N("Reason for update: ")) . format_update_field(rpm_description($update_descr->{pre})),
- ),
- '')); # extra empty line
+ my $s = get_main_text($name, $summary, $is_update, $update_descr);
push @$s, get_advisory_link($update_descr) if $is_update;
push @$s, get_description($pkg, $update_descr);