From ad12994a8bf5dc26f98301058bdee796d60d1377 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 23 Aug 2006 09:17:04 +0000 Subject: (run_treeview_dialog) introduce get_icon() in order to extract group icon --- rpmdrake | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/rpmdrake b/rpmdrake index 4865fd44..d3358c96 100755 --- a/rpmdrake +++ b/rpmdrake @@ -702,6 +702,12 @@ sub run_treeview_dialog { @to_remove; }; $options = { + get_icon => sub { + my ($group) = @_; + my $pixbuf; + eval { $pixbuf = gtkcreate_pixbuf($group_icons{$group}) }; + $pixbuf ||= gtkcreate_pixbuf('applications_section'); + }, node_state => sub { $_[0] ? ($pkgs->{$_[0]}{selected} ? 'selected' : $pkgs->{$_[0]}{pkg}->flag_base ? '/usr/share/rpmdrake/icons/base.png' : 'unselected') : 'XXX'; }, #- checks $_[0] -> hack for partial tree displaying -- cgit v1.2.1