diff options
author | Thierry Vignaud <tv@mandriva.org> | 2007-04-03 14:48:17 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mandriva.org> | 2007-04-03 14:48:17 +0000 |
commit | d18b388714eeda3857c18d0194f305d55922820b (patch) | |
tree | 29e4510b793f756b5fbdfe2755edbbc4bec76aef /Rpmdrake | |
parent | 62e89cc0c01d10198a274f2ea3d49fd0e40de425 (diff) | |
download | rpmdrake-d18b388714eeda3857c18d0194f305d55922820b.tar rpmdrake-d18b388714eeda3857c18d0194f305d55922820b.tar.gz rpmdrake-d18b388714eeda3857c18d0194f305d55922820b.tar.bz2 rpmdrake-d18b388714eeda3857c18d0194f305d55922820b.tar.xz rpmdrake-d18b388714eeda3857c18d0194f305d55922820b.zip |
(format_pkg_simplifiedinfo) fix error message when looking at a
package when there's no medium (eg: One)
Diffstat (limited to 'Rpmdrake')
-rw-r--r-- | Rpmdrake/gui.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/Rpmdrake/gui.pm b/Rpmdrake/gui.pm index be6519f5..867dc0d4 100644 --- a/Rpmdrake/gui.pm +++ b/Rpmdrake/gui.pm @@ -70,7 +70,8 @@ sub compute_main_window_size { sub format_pkg_simplifiedinfo { my ($pkgs, $key, $urpm, $descriptions) = @_; my ($name, $version) = split_fullname($key); - my $medium = pkg2medium($pkgs->{$key}{pkg}, $urpm)->{name}; + my $raw_medium = pkg2medium($pkgs->{$key}{pkg}, $urpm); + my $medium = $raw_medium->{name} if $raw_medium; my $update_descr = $pkgs->{$key}{pkg}->flag_upgrade && $descriptions->{$name}{pre} && $descriptions->{$name}{medium} eq $medium; my $s = ugtk2::markup_to_TextView_format(join("\n", format_header($name . ' - ' . translate($pkgs->{$key}{summary})) . # workaround gtk+ bug where GtkTextView wronly limit embedded widget size to bigger line's width (#25533): @@ -96,13 +97,14 @@ sub format_pkg_simplifiedinfo { gtknew('TextView', text => ugtk2::markup_to_TextView_format( join("\n", format_field(N("Version: ")) . $version, + ($pkgs->{$key}{pkg}->flag_installed ? - format_field(N("Currently installed version: ")) . find_installed_version($pkgs->{$key}{pkg}) + format_field(N("Currently installed version: ")) . eval { find_installed_version($pkgs->{$key}{pkg}) } : () ), format_field(N("Architecture: ")) . $pkgs->{$key}{pkg}->arch, format_field(N("Size: ")) . N("%s KB", int($pkgs->{$key}{pkg}->size/1024)), - format_field(N("Medium: ")) . pkg2medium($pkgs->{$key}{pkg}, $urpm)->{name}, + eval { format_field(N("Medium: ")) . pkg2medium($pkgs->{$key}{pkg}, $urpm)->{name} }, ), ), )) ]; |