diff options
Diffstat (limited to 'bin/passwd.import')
-rwxr-xr-x | bin/passwd.import | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/bin/passwd.import b/bin/passwd.import index 093f8bafd..26ffffb87 100755 --- a/bin/passwd.import +++ b/bin/passwd.import @@ -1,5 +1,5 @@ #!/usr/bin/perl -Tw -# $Id: passwd.import,v 1.8 2003-06-12 14:08:00 ivan Exp $ +# $Id: passwd.import,v 1.9 2004-12-24 23:27:34 ivan Exp $ use strict; use vars qw(%part_svc); @@ -76,6 +76,8 @@ while (<SHADOW>) { my($username,$password)=split(/:/); #$password =~ s/^\!$/\*/; #$password =~ s/\!+/\*SUSPENDED\* /; + $password =~ s/^NP$/\*/; + $password =~ s/^\*LK\*$/\*/; $password{$username}=$password; } |