blob: 128824ec7b8094f68108751e0e80d1ae8a4837ee (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
<% include( '../elements/process.html',
'table' => 'addr_block',
'copy_on_empty' => [ grep { $_ ne 'routernum' }
fields 'addr_block' ],
'redirect' => popurl(4). 'browse/addr_block.cgi?',
'error_redirect' => popurl(4). 'browse/addr_block.cgi?',
'agent_virt' => 1,
'agent_null_right' => 'Broadband global configuration',
)
%>
<%init>
my $conf = new FS::Conf;
my $curuser = $FS::CurrentUser::CurrentUser;
die "access denied"
unless $curuser->access_right('Broadband configuration')
|| $curuser->access_right('Broadband global configuration');
$cgi->param('routernum', 0); # just to be explicit about what we are doing
</%init>
|