template::util::comment_text_normalize (private)

 template::util::comment_text_normalize text

Defined in packages/acs-templating/tcl/doc-tcl-procs.tcl

escapes quotes and removes comment tags from a body of commented text

Parameters:
text
Returns:
text

Partial Call Graph (max 5 caller/called nodes):
%3 doc::parse_namespace doc::parse_namespace (private) template::util::comment_text_normalize template::util::comment_text_normalize doc::parse_namespace->template::util::comment_text_normalize doc::set_proc_name_source_text_comment_text doc::set_proc_name_source_text_comment_text (private) doc::set_proc_name_source_text_comment_text->template::util::comment_text_normalize

Testcases:
No testcase defined.
Source code:
    regsub -all \" $text {\"} text
    regsub -all -- {(\n)\s*#\s*} $text {\1 } text
    regsub {(\A)\s*#\s*} $text {\1 } text
    return $text
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: