diff options
author | Pascal Rigaux <pixel@mandriva.com> | 1999-08-29 22:25:44 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 1999-08-29 22:25:44 +0000 |
commit | fb80b8a8984779543f0f0c50d7f6dcb995e0ce96 (patch) | |
tree | edc635dbab544cc05ce647aafd59419607271596 /perl-install/install_steps.pm | |
parent | d5e061896a35a49a50124949c2882ac9cbe94589 (diff) | |
download | drakx-fb80b8a8984779543f0f0c50d7f6dcb995e0ce96.tar drakx-fb80b8a8984779543f0f0c50d7f6dcb995e0ce96.tar.gz drakx-fb80b8a8984779543f0f0c50d7f6dcb995e0ce96.tar.bz2 drakx-fb80b8a8984779543f0f0c50d7f6dcb995e0ce96.tar.xz drakx-fb80b8a8984779543f0f0c50d7f6dcb995e0ce96.zip |
no_comment
Diffstat (limited to 'perl-install/install_steps.pm')
-rw-r--r-- | perl-install/install_steps.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm index 8e086f70d..622d14dc9 100644 --- a/perl-install/install_steps.pm +++ b/perl-install/install_steps.pm @@ -212,6 +212,8 @@ sub addUser($) { $u{password} = crypt_($u{password}) if $u{password}; + return if $::testing; + local *F; open F, ">> $p/etc/passwd" or die "can't append to passwd file: $!"; print F join(':', @u{@etc_pass_fields}), "\n"; |