diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-12-28 23:52:57 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-12-28 23:52:57 +0000 |
commit | fcef7c0af0b51e7883fe6f78db5ab6f03be8000a (patch) | |
tree | 8321e6fa768420567bb3bcc06d18730b376facac /perl-install/install_steps_gtk.pm | |
parent | 55a6953f8ce1b586d8128feaa1a1e08c9f9beb03 (diff) | |
download | drakx-fcef7c0af0b51e7883fe6f78db5ab6f03be8000a.tar drakx-fcef7c0af0b51e7883fe6f78db5ab6f03be8000a.tar.gz drakx-fcef7c0af0b51e7883fe6f78db5ab6f03be8000a.tar.bz2 drakx-fcef7c0af0b51e7883fe6f78db5ab6f03be8000a.tar.xz drakx-fcef7c0af0b51e7883fe6f78db5ab6f03be8000a.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps_gtk.pm')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 5e6963435..94471d205 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -384,8 +384,8 @@ sub choosePackagesTree { $w->show; $w->set_sensitive(!$p->{base} && !$p->{installed}); $w->signal_connect(focus_in_event => sub { - my $p = pkgs::getHeader($p); - gtktext_insert($info_widget, + my $p = eval { pkgs::getHeader($p) }; + gtktext_insert($info_widget, $@ ? _("Bad package") : _("Version: %s\n", c::headerGetEntry($p, 'version') . '-' . c::headerGetEntry($p, 'release')) . _("Size: %d KB\n", c::headerGetEntry($p, 'size') / 1024) . |