Index: openacs-4/packages/acs-templating/tcl/element-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-templating/tcl/element-procs.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-templating/tcl/element-procs.tcl	31 Aug 2002 02:01:41 -0000	1.5
+++ openacs-4/packages/acs-templating/tcl/element-procs.tcl	1 Sep 2002 19:09:28 -0000	1.6
@@ -428,10 +428,7 @@
   return [info exists element_properties]
 }
 
-# @private get_reference
-
-
-ad_proc -public template::element::get_reference {} {
+ad_proc -private template::element::get_reference {} {
     Gets a reference to the array containing the properties of an
     element, and throws and error if the element does not exist.  Called
     at the beginning of several of the element commands.