From fc9f068b2e720f88b982273c5df398ec2a224129 Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Sat, 8 Feb 2003 19:54:46 +0000 Subject: add option advanced_state: if set to 1, force the "Advanced" part of the dialog to be opened initially --- perl-install/interactive/gtk.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install/interactive/gtk.pm') diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm index 2e52b2640..a923261a1 100644 --- a/perl-install/interactive/gtk.pm +++ b/perl-install/interactive/gtk.pm @@ -640,7 +640,7 @@ sub ask_fromW { $pack->pack_start($buttons_pack, 0, 0, 0) if $buttons_pack; $buttons_pack->show if $buttons_pack; gtkadd($mainw->{window}, $pack); $set_default_size->() if $has_scroll_always; - $set_advanced->(0); + $set_advanced->($common->{advanced_state}); my $widget_to_focus = $common->{focus_cancel} ? $mainw->{cancel} : -- cgit v1.2.1