Index: openacs-4/packages/acs-subsite/tcl/apm-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/apm-callback-procs.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/acs-subsite/tcl/apm-callback-procs.tcl	22 Jan 2005 18:05:03 -0000	1.3
+++ openacs-4/packages/acs-subsite/tcl/apm-callback-procs.tcl	27 Feb 2005 22:45:39 -0000	1.4
@@ -16,10 +16,12 @@
 
 }
 
-ad_proc -public subsite::after_upgrade {
+ad_proc -private subsite::after_upgrade {
     {-from_version_name:required}
     {-to_version_name:required}
 } {
+    After upgrade callback for acs-subsite.
+} {
     apm_upgrade_logic \
         -from_version_name $from_version_name \
         -to_version_name $to_version_name \