From 7e6048a6263048b27697f3c2c3de3e8fac0deff7 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Fri, 31 Oct 2003 15:26:41 +0000 Subject: allow user=xxx on /proc/cmdline to skip ask_user name --- move/move.pm | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) (limited to 'move') diff --git a/move/move.pm b/move/move.pm index 5ef8282c6..3d4f5e905 100644 --- a/move/move.pm +++ b/move/move.pm @@ -61,9 +61,13 @@ drakx_stuff: sub install2::startMove { my $o = $::o; - require any; - any::ask_user_one($o, $o->{users} ||= [], $o->{security}, - additional_msg => N("BLA BLA user for move, password for screensaver"), noaccept => 1, needauser => 1, noicons => 1); + if (cat_('/proc/cmdline') =~ /\buser=(\w+)/) { + $o->{users} = [ { name => $1 } ]; + } else { + require any; + any::ask_user_one($o, $o->{users} ||= [], $o->{security}, + additional_msg => N("BLA BLA user for move, password for screensaver"), noaccept => 1, needauser => 1, noicons => 1); + } require install_steps; install_steps::addUser($o); -- cgit v1.2.1