summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive/gtk.pm
diff options
context:
space:
mode:
authorEugeni Dodonov <eugeni@mandriva.org>2009-05-14 00:50:56 +0000
committerEugeni Dodonov <eugeni@mandriva.org>2009-05-14 00:50:56 +0000
commit2008cf8543126df42dacf0ed7e4860d961b41e96 (patch)
tree6713096778ea7ae169249d85ae111cbc97345be9 /perl-install/interactive/gtk.pm
parent0a0cb2468189f6a08d843859c4cf735792285dca (diff)
downloaddrakx-2008cf8543126df42dacf0ed7e4860d961b41e96.tar
drakx-2008cf8543126df42dacf0ed7e4860d961b41e96.tar.gz
drakx-2008cf8543126df42dacf0ed7e4860d961b41e96.tar.bz2
drakx-2008cf8543126df42dacf0ed7e4860d961b41e96.tar.xz
drakx-2008cf8543126df42dacf0ed7e4860d961b41e96.zip
Added support for toggling 'hidden' parameter on widgets.
Diffstat (limited to 'perl-install/interactive/gtk.pm')
-rw-r--r--perl-install/interactive/gtk.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm
index c144700de..5b9200ed8 100644
--- a/perl-install/interactive/gtk.pm
+++ b/perl-install/interactive/gtk.pm
@@ -661,6 +661,7 @@ sub create_widgets {
my @all = all_entries($l);
$_->{set}->(${$_->{val}}, $_) foreach @all; #- nb: the parameter "$_" is needed for create_boxradio
$_->{disabled} and $_->{real_w}->set_sensitive(!$_->{disabled}()) foreach @all;
+ $_->{hidden} and $_->{w}->set_visibility(!$_->{hidden}()) foreach @all;
$mainw->{ok}->set_sensitive(!$common->{ok_disabled}()) if $common->{ok_disabled};
$ignore = 0;
};