diff options
Diffstat (limited to 'accesslist-duplicates.capsman')
| -rw-r--r-- | accesslist-duplicates.capsman | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/accesslist-duplicates.capsman b/accesslist-duplicates.capsman index d7ff906..64bae58 100644 --- a/accesslist-duplicates.capsman +++ b/accesslist-duplicates.capsman @@ -9,6 +9,8 @@ :local seen [ :toarray "" ]; :local shown [ :toarray "" ]; +:global Read; + :foreach acclist in=[ / caps-man access-list find where mac-address!="00:00:00:00:00:00" ] do={ :local mac [ / caps-man access-list get $acclist mac-address ]; :foreach "seen-mac" in=$seen do={ @@ -20,6 +22,13 @@ :if ($skip = 0) do={ / caps-man access-list print where mac-address=$mac; :set $shown ( $shown , $mac ); + + :put "\nEnter to skip, numeric id to remove!"; + :local remove [ $Read ]; + :if ($remove != "") do={ + :put ("Removing numeric id " . $remove . "...\n"); + / caps-man access-list remove $remove; + } } } } |