diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-08-18 09:31:19 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2004-08-18 09:31:19 +0000 |
commit | a9f79a5dd73567daf73a969f7c2b21a22e9935b9 (patch) | |
tree | 66d578810e59b2d92f75b7f164ae7043098e93bf /perl-install | |
parent | 5ff1e05787636680f50387406072d82123154942 (diff) | |
download | drakx-a9f79a5dd73567daf73a969f7c2b21a22e9935b9.tar drakx-a9f79a5dd73567daf73a969f7c2b21a22e9935b9.tar.gz drakx-a9f79a5dd73567daf73a969f7c2b21a22e9935b9.tar.bz2 drakx-a9f79a5dd73567daf73a969f7c2b21a22e9935b9.tar.xz drakx-a9f79a5dd73567daf73a969f7c2b21a22e9935b9.zip |
Make the status field optional in treeviews
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/ugtk2.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index dd50615f5..ab7b59bd4 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -1275,8 +1275,10 @@ sub ask_browse_tree_info_given_widgets { my ($curr, $prev_label, $idle, $mouse_toggle_pending); my (%wtree, %ptree, %pix, %node_state, %state_stats); my $update_size = sub { - my $new_label = $common->{get_status}(); - $prev_label ne $new_label and $w->{status}->set($prev_label = $new_label); + if ($w->{status}) { + my $new_label = $common->{get_status}(); + $prev_label ne $new_label and $w->{status}->set($prev_label = $new_label); + } }; my $set_node_state_flat = sub { |