Index: openacs-4/packages/acs-tcl/tcl/apm-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/apm-procs.tcl,v
diff -u -r1.60 -r1.61
--- openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	16 Oct 2003 13:02:46 -0000	1.60
+++ openacs-4/packages/acs-tcl/tcl/apm-procs.tcl	20 Oct 2003 17:56:15 -0000	1.61
@@ -1004,7 +1004,7 @@
     return [util_memoize "apm_package_url_from_id_mem $package_id"]
 }
 
-ad_proc -public apm_package_url_from_id_mem {package_id} {
+ad_proc -private apm_package_url_from_id_mem {package_id} {
     return [db_string apm_package_url_from_id {
 	select site_node.url(node_id) 
           from site_nodes 
@@ -1023,7 +1023,7 @@
     return [util_memoize "apm_package_url_from_key_mem $package_key"]
 }
 
-ad_proc -public apm_package_url_from_key_mem {package_key} {
+ad_proc -private apm_package_url_from_key_mem {package_key} {
     set package_id [apm_package_id_from_key $package_key]
     return [apm_package_url_from_id $package_id]
 }