<BR><BR>
<% } %>
-<A HREF="<%=$p2%>edit/router.cgi"><I>Add a new router</I></A><BR><BR>
+<%
+my $hidecustomerrouters = 0;
+my $hideurl = '';
+if ($cgi->param('hidecustomerrouters') eq '1') {
+ $hidecustomerrouters = 1;
+ $cgi->param('hidecustomerrouters', 0);
+ $hideurl = '<A HREF="' . $cgi->self_url() . '">Show customer routers</A>';
+} else {
+ $hidecustomerrouters = 0;
+ $cgi->param('hidecustomerrouters', 1);
+ $hideurl = '<A HREF="' . $cgi->self_url() . '">Hide customer routers</A>';
+}
+%>
+
+<A HREF="<%=$p2%>edit/router.cgi">Add a new router</A> | <%=$hideurl%>
<%=table()%>
<TR>
<TD><B>Address block(s)</B></TD>
</TR>
<% foreach my $router (sort {$a->routernum <=> $b->routernum} @router) {
+ next if $hidecustomerrouters && $router->svcnum;
my @addr_block = $router->addr_block;
+ if (scalar(@addr_block) == 0) {
+ push @addr_block, ' ';
+ }
%>
<TR>
- <TD ROWSPAN="<%=scalar(@addr_block)%>">
+ <TD ROWSPAN="<%=scalar(@addr_block)+1%>">
<A HREF="<%=$p2%>edit/router.cgi?<%=$router->routernum%>"><%=$router->routername%></A>
</TD>
- <TD>
- <% foreach my $block ( @addr_block ) { %>
- <%=$block->NetAddr%></BR>
- <% } %>
- </TD>
+ </TR>
+ <% foreach my $block ( @addr_block ) { %>
+ <TR>
+ <TD><%=UNIVERSAL::isa($block, 'FS::addr_block') ? $block->NetAddr : ' '%></TD>
+ </TR>
+ <% } %>
</TR>
<% } %>
</TABLE>