Index: openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl,v
diff -u -r1.42 -r1.43
--- openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	28 Aug 2003 09:41:43 -0000	1.42
+++ openacs-4/packages/acs-tcl/tcl/request-processor-procs.tcl	15 Sep 2003 16:06:15 -0000	1.43
@@ -1056,7 +1056,7 @@
 }
 
 
-ad_proc -public ad_acs_kernel_id_mem {} {
+ad_proc -private ad_acs_kernel_id_mem {} {
 
     Returns the package_id of the kernel. (not cached)
 
@@ -1070,7 +1070,7 @@
 
 } {
     set acs_kernel_id [ad_acs_kernel_id_mem]
-    ad_proc ad_acs_kernel_id {} {Returns the package_id of the kernel.} "return $acs_kernel_id"
+    ad_proc -public ad_acs_kernel_id {} {Returns the package_id of the kernel.} "return $acs_kernel_id"
     return $acs_kernel_id
 }
 
Index: openacs-4/packages/acs-tcl/tcl/security-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/security-procs.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/acs-tcl/tcl/security-procs.tcl	3 Sep 2003 19:46:03 -0000	1.18
+++ openacs-4/packages/acs-tcl/tcl/security-procs.tcl	15 Sep 2003 16:06:15 -0000	1.19
@@ -220,8 +220,12 @@
     return 1
 }
 
-ad_proc -public ad_change_password { user_id new_password } { Changed the user's password } {
-
+ad_proc -public ad_change_password { 
+    user_id 
+    new_password 
+} { 
+    Change the user's password 
+} {
     # In case someone wants to change the salt from now on, you can do
     # this and still support old users by changing the salt below.
     set salt [sec_random_token]