summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorNicolas Planel <nplanel@mandriva.com>2005-01-11 16:57:08 +0000
committerNicolas Planel <nplanel@mandriva.com>2005-01-11 16:57:08 +0000
commit33c063501930c8c4b0c7059d6f4d67f8ae73f6ce (patch)
tree20fe52fcbed5f1d4d055a711ae340d75e29ad3d1 /perl-install
parentbbe1c4214498c2e58753e9031b76258d28325f36 (diff)
downloaddrakx-33c063501930c8c4b0c7059d6f4d67f8ae73f6ce.tar
drakx-33c063501930c8c4b0c7059d6f4d67f8ae73f6ce.tar.gz
drakx-33c063501930c8c4b0c7059d6f4d67f8ae73f6ce.tar.bz2
drakx-33c063501930c8c4b0c7059d6f4d67f8ae73f6ce.tar.xz
drakx-33c063501930c8c4b0c7059d6f4d67f8ae73f6ce.zip
add user specific shell support in create_user
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/any.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl-install/any.pm b/perl-install/any.pm
index 73152b012..9d6a24d1e 100644
--- a/perl-install/any.pm
+++ b/perl-install/any.pm
@@ -76,6 +76,7 @@ sub create_user {
'adduser',
'-p', authentication::user_crypted_passwd($u, $isMD5),
if_($uid, '-u', $uid), if_($gid, '-g', $gid),
+ if_($u->{shell}, '-s', $u->{shell}),
$u->{name});
}