summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorGuillaume Cottenceau <gc@mandriva.com>2004-02-26 11:08:20 +0000
committerGuillaume Cottenceau <gc@mandriva.com>2004-02-26 11:08:20 +0000
commit6cb588ed76b36e09ff2bf3f7e674603a6455b433 (patch)
tree83a1fa910d1de60a677e5fb65c9ebe261fa4a45f /perl-install
parent34688781cdf547be89662b47c191db616a68e0ef (diff)
downloaddrakx-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.pm1
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;
}