code_for_radio

code_for_radio   column   list_of_vals   items

Helper proc to make-form that makes a radiobutton for edit page code

Source code:

    set form_html "<td>"
    set count 0
    foreach val $list_of_vals {
        append form_html "\n<input name=$column value=\\\"$val\\\" type=radio> [lindex $items $count] "  
        incr count 
    } 
    append form_html "</td>\n" 
    set merged_html "\[bt_mergepiece \"$form_html\" \$selection\]\n"
    return $merged_html