diff options
| -rw-r--r-- | move/move.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/move/move.pm b/move/move.pm index b3850c3c6..0c2adbf56 100644 --- a/move/move.pm +++ b/move/move.pm @@ -428,7 +428,7 @@ sub install2::startMove { sleep 1; log::l("DrakX waves bye-bye"); - (undef, undef, my $uid, my $gid, undef, undef, undef, my $home, my $shell) = getpwnam($username); + my (undef, undef, $uid, $gid, undef, undef, undef, $home, $shell) = getpwnam($username); $( = $) = "$gid $gid"; $< = $> = $uid; $ENV{LOGNAME} = $ENV{USER} = $username; |