summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2003-02-08 19:54:46 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2003-02-08 19:54:46 +0000
commitfc9f068b2e720f88b982273c5df398ec2a224129 (patch)
tree2726635c9b2421a6040ad25565ed16a49bf206a6 /perl-install
parent0c412c059463c9fc1cdc56813d7bc8d8f0ea68c9 (diff)
downloaddrakx-fc9f068b2e720f88b982273c5df398ec2a224129.tar
drakx-fc9f068b2e720f88b982273c5df398ec2a224129.tar.gz
drakx-fc9f068b2e720f88b982273c5df398ec2a224129.tar.bz2
drakx-fc9f068b2e720f88b982273c5df398ec2a224129.tar.xz
drakx-fc9f068b2e720f88b982273c5df398ec2a224129.zip
add option advanced_state: if set to 1, force the "Advanced" part of the dialog to be opened initially
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/interactive.pm1
-rw-r--r--perl-install/interactive/gtk.pm2
2 files changed, 2 insertions, 1 deletions
diff --git a/perl-install/interactive.pm b/perl-install/interactive.pm
index df28cc27b..5d311b0ad 100644
--- a/perl-install/interactive.pm
+++ b/perl-install/interactive.pm
@@ -25,6 +25,7 @@ use common;
#- cancel => force the name of the "Cancel"/"Previous" button
#- advanced_label => force the name of the "Advanced" button
#- advanced_label_close => force the name of the "Basic" button
+#- advanced_state => if set to 1, force the "Advanced" part of the dialog to be opened initially
#- focus_cancel => force focus on the "Cancel" button
#- focus_first => force focus on the first entry
#- callbacks => functions called when something happen: complete canceled advanced changed focus_out ok_disabled
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} :