diff options
| -rw-r--r-- | hotspot-to-wpa | 13 |
1 files changed, 2 insertions, 11 deletions
diff --git a/hotspot-to-wpa b/hotspot-to-wpa index 68f887f..dbb1f49 100644 --- a/hotspot-to-wpa +++ b/hotspot-to-wpa @@ -27,14 +27,5 @@ $LogPrintExit2 info $0 ("Adding/updating accesslist entry for mac address " . $M " (user " . $UserName . ").") false; / caps-man access-list remove [ find where mac-address=$MacAddress comment~"^hotspot-to-wpa: " ]; - -:local Limits [ / caps-man access-list get $PlaceBefore ]; -:if (($Limits->"ap-tx-limit") > 0 && ($Limits->"client-tx-limit") > 0) do={ - / caps-man access-list add comment=("hotspot-to-wpa: " . $UserName . ", " . $MacAddress . ", " . $Date) \ - mac-address=$MacAddress private-passphrase=$PassWord ssid-regexp="-wpa\$" \ - ap-tx-limit=($Limits->"ap-tx-limit") client-tx-limit=($Limits->"client-tx-limit") \ - place-before=$PlaceBefore; -} else={ - / caps-man access-list add comment=("hotspot-to-wpa: " . $UserName . ", " . $MacAddress . ", " . $Date) \ - mac-address=$MacAddress private-passphrase=$PassWord ssid-regexp="-wpa\$" place-before=$PlaceBefore; -} +/ caps-man access-list add comment=("hotspot-to-wpa: " . $UserName . ", " . $MacAddress . ", " . $Date) \ + mac-address=$MacAddress private-passphrase=$PassWord ssid-regexp="-wpa\$" place-before=$PlaceBefore; |