diff options
| author | ivan <ivan> | 2002-05-16 14:28:35 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-05-16 14:28:35 +0000 |
| commit | ac0647c2bacded54f476e7219b1dce05b8d3226c (patch) | |
| tree | 6d5fb19250233494bbf150f48314ac96f38596b3 /bin/svc_acct.export | |
| parent | da311364707d64a2188cb959b3779178563d0ac8 (diff) | |
ip address is added by radius_reply method already
Diffstat (limited to 'bin/svc_acct.export')
| -rwxr-xr-x | bin/svc_acct.export | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/bin/svc_acct.export b/bin/svc_acct.export index 261f499..0bc370f 100755 --- a/bin/svc_acct.export +++ b/bin/svc_acct.export @@ -1,6 +1,6 @@ #!/usr/bin/perl -w # -# $Id: svc_acct.export,v 1.35 2002-03-20 21:31:49 ivan Exp $ +# $Id: svc_acct.export,v 1.36 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 @@ -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; - 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); - } + #} } |