From 6fb41ace5c3ee7ab7e0a36c0e2840801772911d0 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 8 Feb 2008 17:25:14 +0000 Subject: (format_pkg_simplifiedinfo) store installed_version --- Rpmdrake/gui.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm index b184b969..3a46c643 100644 --- a/Rpmdrake/gui.pm +++ b/Rpmdrake/gui.pm @@ -135,13 +135,14 @@ sub format_pkg_simplifiedinfo { (eval { escape_text_for_TextView_markup_format($pkg->{description} || $update_descr->{description}) } || '' . N("No description") . '') )) }; push @$s, [ "\n" ]; + my $installed_version = eval { find_installed_version($upkg) }; push @$s, [ gtkadd(gtkshow(my $exp0 = Gtk2::Expander->new(format_field(N("Details:")))), gtknew('TextView', text => ugtk2::markup_to_TextView_format( $spacing . join("\n$spacing", format_field(N("Version: ")) . $version . '-' . $release, ($upkg->flag_installed ? - format_field(N("Currently installed version: ")) . eval { find_installed_version($upkg) } + format_field(N("Currently installed version: ")) . $installed_version : () ), format_field(N("Architecture: ")) . $upkg->arch, -- cgit v1.2.1