diff options
| author | Thierry Vignaud <tv@mandriva.org> | 2008-08-19 08:37:39 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tv@mandriva.org> | 2008-08-19 08:37:39 +0000 |
| commit | 294f399ae97c94f5fbf68f4293aa89bb6d301a97 (patch) | |
| tree | 4f5f74f3e96856a950971c6b6589e7dab76454e4 /perl-install/interactive/gtk.pm | |
| parent | 2a14e8c34fda320edbfa49030047628e585c94e0 (diff) | |
| download | drakx-backup-do-not-use-294f399ae97c94f5fbf68f4293aa89bb6d301a97.tar drakx-backup-do-not-use-294f399ae97c94f5fbf68f4293aa89bb6d301a97.tar.gz drakx-backup-do-not-use-294f399ae97c94f5fbf68f4293aa89bb6d301a97.tar.bz2 drakx-backup-do-not-use-294f399ae97c94f5fbf68f4293aa89bb6d301a97.tar.xz drakx-backup-do-not-use-294f399ae97c94f5fbf68f4293aa89bb6d301a97.zip | |
(all_focusable_entries) fix crash with advanced widgets (regression introduced
in when moving advanced widgets in their own dialog instead of in another block
child of an expander: we do not have any real Gtk2::Expander widget anymore)
Diffstat (limited to 'perl-install/interactive/gtk.pm')
| -rw-r--r-- | perl-install/interactive/gtk.pm | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index e3cfce740..1bf642e47 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -578,10 +578,7 @@ sub all_entries { sub all_focusable_entries { my ($l) = @_; - map { $_->{type} eq 'expander' - ? ($_->{w}->get_expanded ? all_focusable_entries($_->{children}) : ()) - : $_; - } grep { $_->{focus_w} } @$l; + grep { $_->{focus_w} } @$l; } sub create_widgets_block { |