diff options
Diffstat (limited to 'httemplate/browse/router.cgi')
-rw-r--r-- | httemplate/browse/router.cgi | 38 |
1 files changed, 0 insertions, 38 deletions
diff --git a/httemplate/browse/router.cgi b/httemplate/browse/router.cgi deleted file mode 100644 index feee4ecaa..000000000 --- a/httemplate/browse/router.cgi +++ /dev/null @@ -1,38 +0,0 @@ -<%= header('Routers', menubar('Main Menu' => $p)) %> -<% - -my @router = qsearch('router', {}); -my $p2 = popurl(2); - -%> - -<% if ($cgi->param('error')) { %> - <FONT SIZE="+1" COLOR="#ff0000">Error: <%=$cgi->param('error')%></FONT> - <BR><BR> -<% } %> - -<A HREF="<%=$p2%>edit/router.cgi"><I>Add a new router</I></A><BR><BR> - -<%=table()%> - <TR> - <TD><B>Router name</B></TD> - <TD><B>Address block(s)</B></TD> - </TR> -<% foreach my $router (sort {$a->routernum <=> $b->routernum} @router) { - my @addr_block = $router->addr_block; -%> - <TR> - <TD ROWSPAN="<%=scalar(@addr_block)%>"> - <A HREF="<%=$p2%>edit/router.cgi?<%=$router->routernum%>"><%=$router->routername%></A> - </TD> - <TD> - <% foreach my $block ( @addr_block ) { %> - <%=$block->NetAddr%></BR> - <% } %> - </TD> - </TR> -<% } %> -</TABLE> -</BODY> -</HTML> - |