Index: openacs-4/packages/acs-tcl/tcl/acs-private-data-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-tcl/tcl/acs-private-data-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/acs-tcl/tcl/acs-private-data-procs.tcl	11 Dec 2001 03:47:29 -0000	1.1
+++ openacs-4/packages/acs-tcl/tcl/acs-private-data-procs.tcl	25 Jan 2002 23:03:21 -0000	1.2
@@ -22,7 +22,7 @@
     ad_proc -public privacy_control_set {val} {
 	set the privacy control
     } {
-	ad_parameter -set $val privacy_control_enabled_p acs-kernel
+	ad_parameter -set $val PrivacyControlEnabledP acs-kernel
     }
 
     ad_proc -public user_can_read_private_data_p {