Index: openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl,v diff -u -r1.8 -r1.9 --- openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 8 Sep 2002 17:58:58 -0000 1.8 +++ openacs-4/packages/acs-tcl/tcl/text-html-procs.tcl 15 Sep 2002 22:10:50 -0000 1.9 @@ -1317,7 +1317,9 @@ ad_proc -deprecated util_striphtml {html} { - Use ad_html_to_text instead. + Deprecated. Use ad_html_to_text instead. + + @see ad_html_to_text } { return [ad_html_to_text -- $html] } @@ -1338,6 +1340,7 @@ plaintext. We'd rather let the user change our opinion about the text, e.g. html_p = 't'. + @see ad_text_to_html } { if { [regexp -nocase {

} $raw_string] || [regexp -nocase {
} $raw_string] } { # user was already trying to do this as HTML @@ -1353,6 +1356,8 @@ href="/api-doc/proc-view?proc=ad_convert_to_html">ad_convert_to_html instead. + @see ad_convert_to_html + } { if { $html_p == "t" } { return $raw_string @@ -1364,20 +1369,26 @@ ad_proc -deprecated util_quotehtml { arg } { This proc does exactly the same as ad_quotehtml. Use that instead. This one will be deleted eventually. + + @see ad_quotehtml } { return [ad_quotehtml $arg] } ad_proc -deprecated util_quote_double_quotes {arg} { This proc does exactly the same as ad_quotehtml. Use that instead. This one will be deleted eventually. + + @see ad_quotehtml } { return [ad_quotehtml $arg] } ad_proc -deprecated philg_quote_double_quotes {arg} { This proc does exactly the same as ad_quotehtml. Use that instead. This one will be deleted eventually. + + @see ad_quotehtml } { return [ad_quotehtml $arg] }