projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
da31136
)
ip address is added by radius_reply method already
author
ivan
<ivan>
Thu, 16 May 2002 14:28:35 +0000
(14:28 +0000)
committer
ivan
<ivan>
Thu, 16 May 2002 14:28:35 +0000
(14:28 +0000)
bin/svc_acct.export
patch
|
blob
|
history
diff --git
a/bin/svc_acct.export
b/bin/svc_acct.export
index
261f499
..
0bc370f
100755
(executable)
--- a/
bin/svc_acct.export
+++ b/
bin/svc_acct.export
@@
-1,6
+1,6
@@
#!/usr/bin/perl -w
#
#!/usr/bin/perl -w
#
-# $Id: svc_acct.export,v 1.3
5 2002-03-20 21:31:49
ivan Exp $
+# $Id: svc_acct.export,v 1.3
6 2002-05-16 14:28:35
ivan Exp $
#
# Create and export password, radius and vpopmail password files:
# passwd, passwd.adjunct, shadow, acp_passwd, acp_userinfo, acp_dialup
#
# Create and export password, radius and vpopmail password files:
# passwd, passwd.adjunct, shadow, acp_passwd, acp_userinfo, acp_dialup
@@
-379,12
+379,12
@@
foreach $svc_domain (sort {$a->domain cmp $b->domain} @svc_domain) {
# qq(Password = "$rpassword"\n\t),
join ",\n\t", map { qq($_ = "$radreply{$_}") } keys %radreply;
# qq(Password = "$rpassword"\n\t),
join ",\n\t", map { qq($_ = "$radreply{$_}") } keys %radreply;
- if ( $ip && $ip ne '0e0' ) {
- #print USERS qq(,\n\tFramed-Address = "$ip"\n\n);
- print USERS qq(,\n\tFramed-IP-Address = "$ip"\n\n);
- } else {
+
#
if ( $ip && $ip ne '0e0' ) {
+
#
#print USERS qq(,\n\tFramed-Address = "$ip"\n\n);
+
#
print USERS qq(,\n\tFramed-IP-Address = "$ip"\n\n);
+
#
} else {
print USERS qq(\n\n);
print USERS qq(\n\n);
- }
+
#
}
}
}