Index: openacs-4/packages/dotfolio/tcl/dotfolio-apm-callback-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotfolio/tcl/dotfolio-apm-callback-procs.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotfolio/tcl/dotfolio-apm-callback-procs.tcl	14 May 2005 14:27:44 -0000	1.2
+++ openacs-4/packages/dotfolio/tcl/dotfolio-apm-callback-procs.tcl	23 Jun 2005 01:38:49 -0000	1.3
@@ -21,6 +21,11 @@
 	parameter::set_from_package_key -package_key "acs-kernel" \
 	                                -parameter "UseEmailForLoginP" \
 	                                -value "0"
+
+	# Do not allow self-register
+	parameter::set_from_package_key -package_key "acs-authentication" \
+	    -parameter "AllowSelfRegister" \
+	    -value "0"
     }
 
-}
\ No newline at end of file
+}