4 <% $cgi->redirect($p.'browse/radius_group.html') %>
9 unless $FS::CurrentUser::CurrentUser->access_right('Configuration');
11 my ($query) = $cgi->keywords;
12 $query =~ /^(\d+)$/ or die "Illegal groupnum";
13 my $group = FS::radius_group->by_key($1);
14 my $error = $group->delete;