Changeset 806 for trunk/cgi-bin/main.cgi
- Timestamp:
- 03/07/16 18:05:24 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/main.cgi
r800 r806 259 259 260 260 261 # Initial display: Show master blocks with total allocated subnets, total free subnets261 # Initial display: Show list of VRFs 262 262 sub showSummary { 263 my $masterlist = listSummary($ip_dbh); 264 $page->param(masterlist => $masterlist); 265 266 $page->param(addmaster => ($IPDBacl{$authuser} =~ /a/) ); 263 my $vrflist = listVRF($ip_dbh); 264 $page->param(vrflist => $vrflist); 265 266 # Only systems/network should be allowed to add VRFs - or maybe higher? 267 $page->param(addvrf => ($IPDBacl{$authuser} =~ /s/) ); 267 268 } # showSummary 268 269
Note:
See TracChangeset
for help on using the changeset viewer.