wml_return

one of the documented procedures in this installation of the ACS
Usage:
wml_return { -no_cache_p 0 } page_wml
What it does:
Returns a page to the connection, optionally writing out as HTML for debugging if the debug flag is set to 1.
Defined in: /web/philip/tcl/wap-defs.tcl

Source code:

arg_parser_for_wml_return $args


    set wml_debug_p [ad_parameter WapHTMLDebugMode wap 0]

    if !$wml_debug_p {
	if !$no_cache_p {
	    wap_begin_output
	} else {
	    wap_begin_output_no_cache
	}
	ns_write "$page_wml"
    } else {
	ReturnHeaders
	ns_write "<html><pre>"
	ns_write [ns_quotehtml $page_wml]
	ns_write "</pre></html>"
    }


philg@mit.edu