forums::form::message (public)

 forums::form::message [ -optional ] [ -prefix prefix ] form_name

Defined in packages/forums/tcl/form-procs.tcl

adds form elements to form_name which represent the data held in a forum message

Switches:
-optional
(boolean) (optional)
-prefix
(optional)
Parameters:
form_name

Partial Call Graph (max 5 caller/called nodes):
%3 test_web_forums_message_and_reply web_forums_message_and_reply (test forums) forums::form::message forums::form::message test_web_forums_message_and_reply->forums::form::message _ _ (public) forums::form::message->_ template::element template::element (public) forums::form::message->template::element packages/forums/lib/message/edit.tcl packages/forums/ lib/message/edit.tcl packages/forums/lib/message/edit.tcl->forums::form::message

Testcases:
web_forums_message_and_reply
Source code:

    ##############################
    # Form definition
    #

    set optional_switch [list]
    if { $optional_p } {
        lappend optional_switch -optional
    }

    template::element create $form_name ${prefix}subject  -label [_ forums.Subject]  -datatype text  -widget text  -html {maxlength 200 size 60}  {*}$optional_switch

    template::element create $form_name ${prefix}message_body  -label [_ forums.Body]  -datatype richtext  -widget richtext  -html {rows 20 cols 60 style {width:100%}}  {*}$optional_switch
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: