CursesForms
view release on metacpan or search on metacpan
$$subforms{$_}->draw($fwh);
}
# Draw the widgets
foreach (keys %$widgets) {
($active && $_ eq $focused) ? $$widgets{$_}->draw($fwh, 1) :
$$widgets{$_}->draw($fwh);
}
}
sub _cursor {
# Forms don't have cursors, per-se
}
=head2 setField/getField
$form->setField(BORDER => 1);
@taborder = @{$form->getField('TABORDER')};
These methods are inherited from the Curses::Widgets module, and hence are
syntactically the same. For more specifics please see that module.
( run in 0.344 second using v1.01-cache-2.11-cpan-4d50c553e7e )