diff options
| author | Guillaume Cottenceau <gc@mandriva.com> | 2004-02-26 11:08:20 +0000 |
|---|---|---|
| committer | Guillaume Cottenceau <gc@mandriva.com> | 2004-02-26 11:08:20 +0000 |
| commit | 6cb588ed76b36e09ff2bf3f7e674603a6455b433 (patch) | |
| tree | 83a1fa910d1de60a677e5fb65c9ebe261fa4a45f /perl-install | |
| parent | 34688781cdf547be89662b47c191db616a68e0ef (diff) | |
| download | drakx-6cb588ed76b36e09ff2bf3f7e674603a6455b433.tar drakx-6cb588ed76b36e09ff2bf3f7e674603a6455b433.tar.gz drakx-6cb588ed76b36e09ff2bf3f7e674603a6455b433.tar.bz2 drakx-6cb588ed76b36e09ff2bf3f7e674603a6455b433.tar.xz drakx-6cb588ed76b36e09ff2bf3f7e674603a6455b433.zip | |
ask_browse_tree_info_given_widgets: allow for an initial
selection if necessary (through toggle_nodes)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/ugtk2.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/ugtk2.pm b/perl-install/ugtk2.pm index 29f0b4767..42f631717 100644 --- a/perl-install/ugtk2.pm +++ b/perl-install/ugtk2.pm @@ -1396,6 +1396,7 @@ sub ask_browse_tree_info_given_widgets { }); $common->{rebuild_tree}->(); &$update_size; + $common->{initial_selection} and $common->{toggle_nodes}($set_leaf_state, @{$common->{initial_selection}}); my $_b = before_leaving { $clear_all_caches->() }; $w->{w}->main; } |