From 699bfa00f0b6864af132b4e7ab275b69cca17080 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 13 Feb 2008 14:39:02 +0000 Subject: (get_icon) do not crash when a icon is missing (#37700) --- Rpmdrake/icon.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Rpmdrake/icon.pm b/Rpmdrake/icon.pm index e069be5f..52ebe3ee 100644 --- a/Rpmdrake/icon.pm +++ b/Rpmdrake/icon.pm @@ -187,9 +187,9 @@ sub get_icon { my ($group, $parent) = @_; my $pixbuf; my $path = $group =~ /\|/ ? '/usr/share/icons/mini/' : '/usr/share/icons/'; - my $create_pixbuf = sub { gtknew('Pixbuf', file => join('', $path, $_[0], '.png')) }; - eval { $pixbuf = $create_pixbuf->($group_icons{$group}) }; - eval { $pixbuf ||= $create_pixbuf->($group_icons{$parent}) } if $parent; + my $create_pixbuf = sub { eval { gtknew('Pixbuf', file => join('', $path, $_[0], '.png')) } }; + $pixbuf = $create_pixbuf->($group_icons{$group}); + $pixbuf ||= $create_pixbuf->($group_icons{$parent}) if $parent; $pixbuf ||= $create_pixbuf->('applications_section'); } -- cgit v1.2.1