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 -N -r1.17 -r1.18
--- openacs-4/packages/acs-subsite/lib/login.tcl	17 Oct 2003 17:51:07 -0000	1.17
+++ openacs-4/packages/acs-subsite/lib/login.tcl	24 Oct 2003 11:13:43 -0000	1.18
@@ -48,6 +48,8 @@
 }
 if { $allow_persistent_login_p } {
     set default_persistent_login_p [parameter::get -parameter DefaultPersistentLoginP -package_id [ad_acs_kernel_id] -default 1]
+} else {
+    set default_persistent_login_p 0
 }