diff options
| author | Jordan K. Hubbard <jkh@FreeBSD.org> | 1995-05-20 13:05:22 +0000 |
|---|---|---|
| committer | Jordan K. Hubbard <jkh@FreeBSD.org> | 1995-05-20 13:05:22 +0000 |
| commit | 7b74963e46e8c56082d39150604af0404a67f486 (patch) | |
| tree | 13522e058eb3c57124d1d3f541cbda94400d4b9a /usr.sbin/adduser/adduser.perl | |
| parent | 8568ba4e733bc690a60fc02372c2d5c3d626b5ee (diff) | |
| download | src-7b74963e46e8c56082d39150604af0404a67f486.tar.gz src-7b74963e46e8c56082d39150604af0404a67f486.zip | |
The problem is the returned salt, while the freebsd man pages asks that the
crypt salt string begin with a '_', no other crypt's do. If you remove the
initialization of $salt to '_' in sub salt(), everything works as advertised.
Submitted by: Charles Henrich <henrich@crh.cl.msu.edu>
Notes
Notes:
svn path=/head/; revision=8644
Diffstat (limited to 'usr.sbin/adduser/adduser.perl')
| -rw-r--r-- | usr.sbin/adduser/adduser.perl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/usr.sbin/adduser/adduser.perl b/usr.sbin/adduser/adduser.perl index ab09e1d790d0..5d27ddb0244b 100644 --- a/usr.sbin/adduser/adduser.perl +++ b/usr.sbin/adduser/adduser.perl @@ -32,7 +32,7 @@ # # Email: Wolfram Schneider <wosch@cs.tu-berlin.de> # -# $Id: adduser.perl,v 1.5 1995/04/09 03:34:10 ache Exp $ +# $Id: adduser.perl,v 1.6 1995/04/30 19:20:25 ache Exp $ # # read variables @@ -796,7 +796,7 @@ sub uniq { # see /usr/src/usr.bin/passwd/local_passwd.c or librcypt, crypt(3) sub salt { - local($salt) = '_'; # initialization + local($salt); # initialization local($i, $rand); local(@itoa64) = ( 0 .. 9, a .. z, A .. Z ); # 0 .. 63 |