% $m->comp( "/widgets/wrappers/sharky/table_top.mc", % caption => 'Please log in:' % ); % if (SSL_ENABLE && ! ALWAYS_USE_SSL) { % } % if (SSL_ENABLE && ALWAYS_USE_SSL) { % } else { % }
Username: <& '/widgets/profile/text.mc', name => 'login|username', useTable => 0 &>
Password: <& '/widgets/profile/password.mc', name => 'login|password', useTable => 0 &>
Use SSL: <& '/widgets/profile/checkbox.mc', name => 'login|ssl', value => 1, checked => $state eq 'ssl' ? 1 : 0, useTable => 0 &>
  " value="Login">
% $m->comp( "/widgets/wrappers/sharky/table_bottom.mc");
<%args> $widget <%init>; my $state = get_state_name($widget) || 'nossl';