summaryrefslogtreecommitdiffstats
path: root/perl-install/my_gtk.pm
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2002-08-05 13:31:54 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2002-08-05 13:31:54 +0000
commit7b2fc2637d30c36d50e0c6a4006c3bf6d594c1cd (patch)
treed87209206759c1f7d7b0ef5124ae73ea08285042 /perl-install/my_gtk.pm
parent88945cb8cd27a11295159cb85944d00180280d61 (diff)
downloaddrakx-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.pm1
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]);
};