i'm not usually like this.

[freeside.git] / httemplate / browse / router.cgi

diff --git a/httemplate/browse/router.cgi b/httemplate/browse/router.cgi
index a9ec6fd..149db49 100644 (file)
--- a/httemplate/browse/router.cgi
+++ b/httemplate/browse/router.cgi
@@ -11,25 +11,44 @@ my $p2 = popurl(2);
    <BR><BR>
 <% } %>
 
    <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>&nbsp;|&nbsp;<%=$hideurl%>

 
 <%=table()%>
   <TR>
     <TD><B>Router name</B></TD>
     <TD><B>Address block(s)</B></TD>
   </TR>
 
 <%=table()%>
   <TR>
     <TD><B>Router name</B></TD>
     <TD><B>Address block(s)</B></TD>
   </TR>

-<% foreach $router (sort {$a->routernum <=> $b->routernum} @router) {
+<% foreach my $router (sort {$a->routernum <=> $b->routernum} @router) {
+     next if $hidecustomerrouters && $router->svcnum;

      my @addr_block = $router->addr_block;
      my @addr_block = $router->addr_block;

+     if (scalar(@addr_block) == 0) {
+       push @addr_block, '&nbsp;';
+     }

 %>
   <TR>
 %>
   <TR>

-    <TD ROWSPAN="<%=scalar(@addr_block)%>">
+    <TD ROWSPAN="<%=scalar(@addr_block)+1%>">

       <A HREF="<%=$p2%>edit/router.cgi?<%=$router->routernum%>"><%=$router->routername%></A>
     </TD>
       <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 : '&nbsp;'%></TD>
+  </TR>
+  <% } %>

   </TR>
 <% } %>
 </TABLE>
   </TR>
 <% } %>
 </TABLE>