X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fbrowse%2Frouter.cgi;h=85512f8df1a2835b45c6023eb589862118f83d5f;hp=9f7167329b7d12c9fe4fc9fcf42e41ee93fa1939;hb=f32ac83068c6211f829f1688a1a9cdec71bc6ec7;hpb=a1871d3d13c1dafa93b956762c0d23728d261da7 diff --git a/httemplate/browse/router.cgi b/httemplate/browse/router.cgi index 9f7167329..85512f8df 100644 --- a/httemplate/browse/router.cgi +++ b/httemplate/browse/router.cgi @@ -9,26 +9,32 @@ 'count_query' => "SELECT count(*) from router $count_sql", 'header' => [ 'Router name', 'Address block(s)', + 'IP addressing', + 'Action', ], 'fields' => [ 'routername', sub { join( '
', map { $_->NetAddr } shift->addr_block ); }, + sub { shift->manual_addr ? 'Manual' : 'Automatic' }, + sub { 'Delete' }, ], 'links' => [ [ "${p2}edit/router.cgi?", 'routernum' ], '', + '', + [ "${p}misc/delete-router.html?", 'routernum' ], ], 'agent_virt' => 1, - 'agent_null_right'=> "Engineering global configuration", + 'agent_null_right'=> "Broadband global configuration", 'agent_pos' => 1, ) %> <%init> die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('Engineering configuration') - || $FS::CurrentUser::CurrentUser->access_right('Engineering global configuration'); + unless $FS::CurrentUser::CurrentUser->access_right('Broadband configuration') + || $FS::CurrentUser::CurrentUser->access_right('Broadband global configuration'); my $p2 = popurl(2); my $extra_sql = ''; @@ -37,16 +43,19 @@ my @menubar = ( 'Add a new router', "${p2}edit/router.cgi" ); if ($cgi->param('hidecustomerrouters') eq '1') { $extra_sql = 'WHERE svcnum > 0'; - $cgi->param('hidecustomerrouters', 0); + $cgi->delete('hidecustomerrouters'); push @menubar, 'Show customer routers', $cgi->self_url(); + $cgi->param('hidecustomerrouters', 1); } else { $cgi->param('hidecustomerrouters', 1); push @menubar, 'Hide customer routers', $cgi->self_url(); + $cgi->delete('hidecustomerrouters'); } my $count_sql = $extra_sql. ( $extra_sql =~ /WHERE/ ? ' AND' : 'WHERE' ). $FS::CurrentUser::CurrentUser->agentnums_sql( - 'null_right' => 'Engineering global configuration', + 'null_right' => 'Broadband global configuration', ); +