'Router',
'Action(s)',
'',
+ '',
],
'fields' => [ 'NetAddr',
sub { my $block = shift;
},
$allocate_text,
sub { shift->router ? '' : '<FONT SIZE="-2">(split)</FONT>' },
+ sub { '<FONT SIZE="-2">('. (shift->manual_flag ? 'allow' : 'prevent'). ' automatic ip assignment)</FONT>' },
],
'links' => [ '',
'',
[ 'javascript:void(0)', '' ],
$split_link,
+ $autoassign_link,
],
'link_onclicks' => [ '',
'',
$ref;
};
+my $autoassign_link = sub {
+ my $block = shift;
+ my $url = "$path/manual_flag.cgi?manual_flag=";
+ $url .= $block->manual_flag ? '' : 'Y';
+ [ "$url;blocknum=", 'blocknum' ];
+};
+
</%init>