From 826de39ec3543b3c856664c13a36c203ae449ec6 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <tvignaud@mandriva.org>
Date: Thu, 11 Mar 2004 15:18:24 +0000
Subject: list yes/no for autologin in a more intuitive way, that is yes is
 grouped with user and wm pull down menus (robert.vojta@qcm.cz, anthill #390)

---
 perl-install/standalone/drakboot | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

(limited to 'perl-install/standalone/drakboot')

diff --git a/perl-install/standalone/drakboot b/perl-install/standalone/drakboot
index 7b26e0f1c..e6899868a 100755
--- a/perl-install/standalone/drakboot
+++ b/perl-install/standalone/drakboot
@@ -163,8 +163,8 @@ gtkadd($window,
                                                  }),
                                gtkpack__(gtkset_sensitive($x_box = Gtk2::VBox->new(0, 0), $x_mode),
                                          gtkpack__(Gtk2::VBox->new(0, 0),
-                                                   my @auto_buttons = gtkradio((N("Yes, I want autologin with this (user, desktop)")) x 2,
-                                                                               N("No, I don't want autologin")),
+                                                   my @auto_buttons = gtkradio((N("No, I don't want autologin")) x 2,
+                                                                               N("Yes, I want autologin with this (user, desktop)")),
                                                   ),
                                          gtkpack__(
                                                    my $auto_box = Gtk2::HBox->new,
@@ -198,10 +198,10 @@ gtkadd($window,
       );
 
 if (!$splash_working) {
-    $auto_buttons[0]->signal_connect('toggled' => sub { $auto_box->set_sensitive($auto_buttons[0]->get_active) });
-    $auto_buttons[1]->signal_connect('toggled' => sub { $auto_box->set_sensitive(!$auto_buttons[1]->get_active) });
-    $auto_buttons[0]->set_active(1) if $auto_mode->{autologin};
-    $auto_buttons[1]->set_active(1) if !$auto_mode->{autologin};
+    $auto_buttons[1]->signal_connect('toggled' => sub { $auto_box->set_sensitive($auto_buttons[1]->get_active) });
+    $auto_buttons[0]->signal_connect('toggled' => sub { $auto_box->set_sensitive(!$auto_buttons[0]->get_active) });
+    $auto_buttons[1]->set_active(1) if $auto_mode->{autologin};
+    $auto_buttons[0]->set_active(1) if !$auto_mode->{autologin};
     $x_box->set_sensitive($x_mode);
     $auto_box->set_sensitive($auto_mode->{autologin} ? 1 : 0);
 }
@@ -249,7 +249,7 @@ sub lilo_choice() {
 sub updateAutologin() {
     my ($usern, $deskt) = ($user_combo->entry->get_text, $desktop_combo->entry->get_text);
     $::testing and return;
-    if ($auto_buttons[0]->get_active) {
+    if ($auto_buttons[1]->get_active) {
         any::set_autologin($usern, $deskt);
     } else {
         any::set_autologin();
-- 
cgit v1.2.1