Index: openacs-4/packages/acs-subsite/lib/login.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/login.tcl,v
diff -u -r1.21 -r1.22
--- openacs-4/packages/acs-subsite/lib/login.tcl	8 Feb 2004 17:20:48 -0000	1.21
+++ openacs-4/packages/acs-subsite/lib/login.tcl	10 Jun 2004 17:06:47 -0000	1.22
@@ -14,6 +14,12 @@
     security::require_secure_conn
 }
 
+
+set self_registration [parameter::get_from_package_key \
+                                  -package_key acs-authentication \
+                                -parameter AllowSelfRegister]   
+
+
 if { ![exists_and_not_null package_id] } {
     set subsite_id [subsite::get_element -element object_id]
 }
@@ -36,6 +42,9 @@
     }
 }
 
+
+
+
 # Persistent login
 # The logic is: 
 #  1. Allowed if allowed both site-wide (on acs-kernel) and on the subsite