summaryrefslogtreecommitdiff
path: root/bin/svc_acct.import
diff options
context:
space:
mode:
Diffstat (limited to 'bin/svc_acct.import')
-rwxr-xr-xbin/svc_acct.import8
1 files 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 (<SHADOW>) {
chop;
my($username,$password)=split(/:/);
+ $password =~ s/^\!$/\*/;
$password =~ s/\!+/\*SUSPENDED\* /;
$password{$username}=$password;
}