Index: openacs-4/packages/acs-templating/tcl/doc-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/doc-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/acs-templating/tcl/doc-procs.tcl 13 Mar 2001 22:59:27 -0000 1.1 +++ openacs-4/packages/acs-templating/tcl/doc-procs.tcl 9 May 2001 05:15:58 -0000 1.2 @@ -19,7 +19,7 @@ # @param id # The ID of the foo passed with the request. -proc template::parse_directives { code } { +ad_proc -public template::parse_directives { code } { # remove carriage returns if present regsub -all {\r|\r\n} $code {\n} code @@ -75,7 +75,7 @@ # Assemble directives into data source(s) for presentation. -proc template::get_datasources { code } { +ad_proc -public template::get_datasources { code } { upvar datasources:rowcount rowcount set rowcount 0 @@ -157,7 +157,7 @@ } } -proc template::verify_datasources {} { +ad_proc -public template::verify_datasources {} { return 1 }