From 5ea5e381f9840d127fe444d8eecf34be4c45d0e6 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 2 Dec 2002 17:54:56 +0000
Subject: any::get_autologin() doesnt modify $o, it returns a hash

---
 perl-install/install_steps_interactive.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perl-install/install_steps_interactive.pm')

diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index a2258f64c..7046e0d28 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -1159,7 +1159,7 @@ sub addUser {
     if ($o->{security} >= 1 || $clicked) {
 	any::ask_users($o->{prefix}, $o, $o->{users}, $o->{security});
     }
-    any::get_autologin($o);
+    add2hash($o, any::get_autologin());
     any::autologin($o, $o);
 
     install_steps::addUser($o);
-- 
cgit v1.2.1