bool_table_prompt { -span {} } prompt name valueWhat it does:
generate a boolean promptDefined in: /web/philip/tcl/ticket-defs.tcl
Source code:
arg_parser_for_bool_table_prompt $args if {![empty_string_p $span]} { set html "<tr><td colspan=$span><strong>$prompt</strong> " } else { set html "<tr><th align=left>$prompt</th><td>" } if {$value == "t"} { append html "<input type=radio name=$name value=t CHECKED> Yes<input type=radio name=$name value=f> No" } else { append html "<input type=radio name=$name value=t> Yes<input type=radio name=$name value=f CHECKED> No" } append html "</td>\n</tr>\n\n" return $html