From bdf21fd3a04d47a91e2bf1d920f86c84138742e0 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 1 Aug 2000 00:43:29 +0000 Subject: no_comment --- perl-install/Xconfigurator.pm | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) (limited to 'perl-install') diff --git a/perl-install/Xconfigurator.pm b/perl-install/Xconfigurator.pm index de90d04fe..0af8531c8 100644 --- a/perl-install/Xconfigurator.pm +++ b/perl-install/Xconfigurator.pm @@ -1074,15 +1074,13 @@ Would you like X to start when you reboot?"), 1); $l{uid} > 500, $l{name}; } cat_("$o->{prefix}/etc/passwd"); - if (exists $o->{miscellaneous}{autologuser} || $::auto || !@users - || $in->ask_yesorno(_("Autologin at startup"), + exists $o->{miscellaneous}{autologuser} || $::auto || !@users or + $in->ask_yesorno(_("Autologin at startup"), _("I can set up your computer to automatically log on one user. -Would you like to use this feature?"), 1)) { - $in->ask_from_entries_refH(_("Autologin"), - _("Autologin - Choose default user\n"), +Would you like to use this feature?"), 1) && $in->ask_from_entries_refH(_("Autologin"), + _("Autologin - Choose default user"), [ _("Choose the default user :") => {val => \$o->{miscellaneous}{autologuser}, list => \@users, not_edit => 1} ], ); - } } run_program::rooted($prefix, "chkconfig", "--del", "gpm") if $o->{mouse}{device} =~ /ttyS/ && !$::isStandalone; } -- cgit v1.2.1