projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix field order in docs for new import formats, RT#77747, RT#76992
[freeside.git]
/
httemplate
/
browse
/
router.cgi
diff --git
a/httemplate/browse/router.cgi
b/httemplate/browse/router.cgi
index
9f71673
..
85512f8
100644
(file)
--- 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)',
'count_query' => "SELECT count(*) from router $count_sql",
'header' => [ 'Router name',
'Address block(s)',
+ 'IP addressing',
+ 'Action',
],
'fields' => [ 'routername',
sub { join( '<BR>', map { $_->NetAddr }
shift->addr_block
);
},
],
'fields' => [ 'routername',
sub { join( '<BR>', map { $_->NetAddr }
shift->addr_block
);
},
+ sub { shift->manual_addr ? 'Manual' : 'Automatic' },
+ sub { 'Delete' },
],
'links' => [ [ "${p2}edit/router.cgi?", 'routernum' ],
'',
],
'links' => [ [ "${p2}edit/router.cgi?", 'routernum' ],
'',
+ '',
+ [ "${p}misc/delete-router.html?", 'routernum' ],
],
'agent_virt' => 1,
],
'agent_virt' => 1,
- 'agent_null_right'=> "
Engineering
global configuration",
+ 'agent_null_right'=> "
Broadband
global configuration",
'agent_pos' => 1,
)
%>
<%init>
die "access denied"
'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 = '';
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';
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();
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();
} 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(
}
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',
);
);
+
</%init>
</%init>