diff options
author | Guillaume Cottenceau <gc@mandriva.com> | 2003-02-08 19:54:46 +0000 |
---|---|---|
committer | Guillaume Cottenceau <gc@mandriva.com> | 2003-02-08 19:54:46 +0000 |
commit | fc9f068b2e720f88b982273c5df398ec2a224129 (patch) | |
tree | 2726635c9b2421a6040ad25565ed16a49bf206a6 /perl-install | |
parent | 0c412c059463c9fc1cdc56813d7bc8d8f0ea68c9 (diff) | |
download | drakx-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.pm | 1 | ||||
-rw-r--r-- | perl-install/interactive/gtk.pm | 2 |
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} : |