%perl> # Show the story summary if needed. if ($show_summary) { my $type = $tile->get_object_type; # Nab the story from the story_prof widget my $asset = get_state_data($type.'_prof', $type); $m->comp('/widgets/summary/summary.mc', asset => $asset, number => ++$i); } %perl> <& '/widgets/wrappers/sharky/table_top.mc', caption => $lang->maketext("[_1] Field Text",$field), id => 'containerprof', number => ++$i, &> <& '/widgets/profile/textarea.mc', 'name' => $widget.'|text', 'rows' => $rows, 'cols' => $cols, 'value' => $text &>
![]() |
<& '/widgets/profile/text.mc', 'name' => $widget.'|cols', 'value' => "$cols", 'size' => 3, 'useTable' => 0 &> | <%$lang->maketext('Columns')%> | <& '/widgets/profile/text.mc', 'name' => $widget.'|rows', 'value' => "$rows", 'size' => 3, 'useTable' => 0 &> | <%$lang->maketext('Rows')%> |
![]() |
<& '/widgets/profile/radio.mc', 'name' => $widget.'|separator', 'value' => "\n", 'checked' => $sep eq "\n" &> <%$lang->maketext('One blank line')%> |
<& '/widgets/profile/radio.mc', 'name' => $widget.'|separator',
'value' => ' ', 'checked' => $sep eq ' ' &> <p> |
<& '/widgets/profile/radio.mc', 'name' => $widget.'|separator',
'value' => ' ', 'checked' => $sep eq ' ' &> <br> |
<& '/widgets/profile/radio.mc', 'name' => $widget.'|separator', 'value' => 'custom', 'checked' => $use_custom_sep &> |
![]() |
<%$lang->maketext('Words')%> |
<%$lang->maketext('Characters')%> |
', 'words', 'chars')">![]() |