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 | |
parent | da311364707d64a2188cb959b3779178563d0ac8 (diff) |
ip address is added by radius_reply method already
Diffstat (limited to 'bin')
-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 261f499da..0bc370fc0 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); - } + #} } |