diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2002-08-05 13:31:54 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2002-08-05 13:31:54 +0000 |
| commit | 7b2fc2637d30c36d50e0c6a4006c3bf6d594c1cd (patch) | |
| tree | d87209206759c1f7d7b0ef5124ae73ea08285042 /perl-install/my_gtk.pm | |
| parent | 88945cb8cd27a11295159cb85944d00180280d61 (diff) | |
| download | drakx-7b2fc2637d30c36d50e0c6a4006c3bf6d594c1cd.tar drakx-7b2fc2637d30c36d50e0c6a4006c3bf6d594c1cd.tar.gz drakx-7b2fc2637d30c36d50e0c6a4006c3bf6d594c1cd.tar.bz2 drakx-7b2fc2637d30c36d50e0c6a4006c3bf6d594c1cd.tar.xz drakx-7b2fc2637d30c36d50e0c6a4006c3bf6d594c1cd.zip | |
the state can be XXX also in flat mode, for disabling
the setting of the state
Diffstat (limited to 'perl-install/my_gtk.pm')
| -rw-r--r-- | perl-install/my_gtk.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm index f5064c898..458164a8f 100644 --- a/perl-install/my_gtk.pm +++ b/perl-install/my_gtk.pm @@ -405,6 +405,7 @@ sub ask_browse_tree_info_given_widgets { my $set_node_state_flat = sub { my ($node, $state) = @_; + $state eq 'XXX' and return; $pix{$state} ||= [ gtkcreate_png($state) ]; $w->{tree}->node_set_pixmap($node, 1, $pix{$state}[0], $pix{$state}[1]); }; |