From f50e19a81e4f15d8ec15376d1674dfe6caad3d82 Mon Sep 17 00:00:00 2001 From: ivan Date: Mon, 7 May 2001 15:24:15 +0000 Subject: [PATCH] s/!/*/ --- bin/svc_acct.import | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/bin/svc_acct.import b/bin/svc_acct.import index 0f459483f..2e51a8b2c 100755 --- a/bin/svc_acct.import +++ b/bin/svc_acct.import @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: svc_acct.import,v 1.13 2001-05-05 08:51:16 ivan Exp $ +# $Id: svc_acct.import,v 1.14 2001-05-07 15:24:15 ivan Exp $ # # ivan@sisd.com 98-mar-9 # @@ -17,7 +17,10 @@ # don't import /var/spool/freeside/conf/shells! ivan@sisd.com 98-aug-13 # # $Log: svc_acct.import,v $ -# Revision 1.13 2001-05-05 08:51:16 ivan +# Revision 1.14 2001-05-07 15:24:15 ivan +# s/!/*/ +# +# Revision 1.13 2001/05/05 08:51:16 ivan # http://www.sisd.com/freeside/list-archive/msg01915.html # # Revision 1.12 2001/04/22 01:56:15 ivan @@ -203,6 +206,7 @@ my(%password); while () { chop; my($username,$password)=split(/:/); + $password =~ s/^\!$/\*/; $password =~ s/\!+/\*SUSPENDED\* /; $password{$username}=$password; } -- 2.11.0