From 0c525f3ba7b2b6730b8939b950e4d76dd16802a9 Mon Sep 17 00:00:00 2001 From: cvs2git Date: Thu, 5 Jan 2006 09:34:30 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'SQL_LEDGER_2_4_4'. --- httemplate/browse/addr_block.cgi | 76 ---------------------------------------- 1 file changed, 76 deletions(-) delete mode 100644 httemplate/browse/addr_block.cgi (limited to 'httemplate/browse/addr_block.cgi') diff --git a/httemplate/browse/addr_block.cgi b/httemplate/browse/addr_block.cgi deleted file mode 100644 index 06ac556cf..000000000 --- a/httemplate/browse/addr_block.cgi +++ /dev/null @@ -1,76 +0,0 @@ -<%= header('Address Blocks', menubar('Main Menu' => $p)) %> -<% - -use NetAddr::IP; - -my @addr_block = qsearch('addr_block', {}); -my @router = qsearch('router', {}); -my $block; -my $p2 = popurl(2); -my $path = $p2 . "edit/process/addr_block"; - -%> - -<% if ($cgi->param('error')) { %> - Error: <%=$cgi->param('error')%> -

-<% } %> - -<%=table()%> - -<% foreach $block (sort {$a->NetAddr cmp $b->NetAddr} @addr_block) { %> - - <%=$block->NetAddr%> - <% if (my $router = $block->router) { %> - <% if (scalar($block->svc_broadband) == 0) { %> - - <%=$router->routername%> - - -
- - -
- - <% } else { %> - - <%=$router->routername%> - - <% } %> - <% } else { %> - -
- - - -
- - -
- - -
- - -<% } - } %> -
- -
- Gateway/Netmask - - / - - - - -
- - - - - -- cgit v1.2.1