Changeset 913 for trunk/cgi-bin/main.cgi
- Timestamp:
- 11/02/17 16:24:13 (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/cgi-bin/main.cgi
r906 r913 430 430 # Common elements 431 431 my $pinfo = getBlockData($ip_dbh, $webvar{parent}); 432 $page->param(blockpctfree => sprintf("%0.1f", $pinfo->{nfree}/2**(32-$pinfo->{masklen}) * 100 ) ); 432 433 433 434 ##fixme: do we add a wrapper to not show the edit link for master blocks? … … 453 454 my $cidr = new NetAddr::IP $poolinfo->{block}; 454 455 $page->param(vlan => $poolinfo->{vlan}); 456 $page->param(poolpctfree => sprintf("%0.1f", $poolinfo->{nfree}/2**(32-$poolinfo->{masklen}) * 100 ) ); 455 457 456 458 # Tree navigation
Note:
See TracChangeset
for help on using the changeset viewer.