From 79d9d54b2599348cf27db2e1900119a74a08347e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 1 Jul 2004 07:07:44 +0000 Subject: a somewhat better error checking --- move/move.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'move/move.pm') diff --git a/move/move.pm b/move/move.pm index bb20a1156..c1458407a 100644 --- a/move/move.pm +++ b/move/move.pm @@ -685,7 +685,7 @@ sub install2::startMove { install_TrueFS_in_home($o); - my $username = $o->{users}[0]{name}; + my $username = $o->{users}[0]{name} or die 'no user'; output('/var/run/console.lock', $username); output("/var/run/console/$username", 1); run_program::run('pam_console_apply'); -- cgit v1.2.1