diff options
author | Ivan Kohler <ivan@freeside.biz> | 2013-05-10 12:55:52 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2013-05-10 12:55:52 -0700 |
commit | 63973c641c4be00765fa27e55c57cc5b9aa4da19 (patch) | |
tree | 68ea71023d7116229e97fd27b38b87b5ac65228a /bin/fs-radius-add-check | |
parent | 7b5a266236857fbb4bbf8d4ac3031c3fec75cac2 (diff) | |
parent | 0832972047a36d19ffcf7d1462abc48de7045d3d (diff) |
merge NG auth, RT#21563
Diffstat (limited to 'bin/fs-radius-add-check')
-rwxr-xr-x | bin/fs-radius-add-check | 8 |
1 files changed, 3 insertions, 5 deletions
diff --git a/bin/fs-radius-add-check b/bin/fs-radius-add-check index 4e4769e58..ee093b375 100755 --- a/bin/fs-radius-add-check +++ b/bin/fs-radius-add-check @@ -1,20 +1,18 @@ #!/usr/bin/perl -Tw # quick'n'dirty hack of fs-setup to add radius attributes +# (i'm not sure this even works in the new world of schema changes - everyone +# uses attributes via groups now) use strict; use DBI; -use FS::UID qw(adminsuidsetup checkeuid getsecrets); +use FS::UID qw(adminsuidsetup); use FS::raddb; -die "Not running uid freeside!" unless checkeuid(); - my %attrib2db = map { lc($FS::raddb::attrib{$_}) => $_ } keys %FS::raddb::attrib; my $user = shift or die &usage; -getsecrets($user); - my $dbh = adminsuidsetup $user; ### |