diff options
author | Thierry Vignaud <tvignaud@mandriva.org> | 2002-11-19 15:16:12 +0000 |
---|---|---|
committer | Thierry Vignaud <tvignaud@mandriva.org> | 2002-11-19 15:16:12 +0000 |
commit | 980edfdf254947ae60534f97551be7018f0b75bb (patch) | |
tree | 458b7d77c31e6cd1468933f07c48907bb2c7be8c /perl-install | |
parent | 63f4f397d563d61ab8d876e8c8c3755e4d308d41 (diff) | |
download | drakx-980edfdf254947ae60534f97551be7018f0b75bb.tar drakx-980edfdf254947ae60534f97551be7018f0b75bb.tar.gz drakx-980edfdf254947ae60534f97551be7018f0b75bb.tar.bz2 drakx-980edfdf254947ae60534f97551be7018f0b75bb.tar.xz drakx-980edfdf254947ae60534f97551be7018f0b75bb.zip |
- remove debugging code
- document menu building
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/harddrake/ui.pm | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/harddrake/ui.pm b/perl-install/harddrake/ui.pm index a468fc1ee..e49e86d5c 100644 --- a/perl-install/harddrake/ui.pm +++ b/perl-install/harddrake/ui.pm @@ -272,9 +272,8 @@ sub new { foreach (['PRINTERS_DETECTION', N("/Autodetect printers")], ['MODEMS_DETECTION', N("/Autodetect modems")]) { $check_boxes{$_->[0]} = $menubar->{factory}->get_widget("<main>".N("/Options").$_->[1]); - print "$_->[0] : value=$options{$_->[0]}, defined=" , defined($options{$_->[0]}), "\n"; - $options{$_->[0]} = 0 unless defined($options{$_->[0]}); - $check_boxes{$_->[0]}->set_active($options{$_->[0]}); + $options{$_->[0]} = 0 unless defined($options{$_->[0]}); # force detection by default + $check_boxes{$_->[0]}->set_active($options{$_->[0]}); # restore saved values } foreach ($module_cfg_button, $config_button) { $_->hide }; @@ -287,7 +286,7 @@ sub quit_global { kill(15, $pid) if $pid; setVarsInSh($conffile, \%options); $w->{rwindow}->destroy; - $in->exit; + my_gtk->exit(0); } # remove a signal handler from a button & hide it if needed |