Index: openacs-4/packages/acs-subsite/www/register/auto-login.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/auto-login.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-subsite/www/register/auto-login.tcl	10 Jan 2007 21:22:09 -0000	1.2
+++ openacs-4/packages/acs-subsite/www/register/auto-login.tcl	7 Aug 2017 23:47:59 -0000	1.3
@@ -6,7 +6,7 @@
 } {
     email
     password
-    {return_url "/"}
+    {return_url:localurl "/"}
 }
 
 array set auth_info [auth::authenticate \
@@ -21,3 +21,9 @@
     # Login problem - redirect to login form
     ad_returnredirect [export_vars -base /register { email return_url }]    
 }
+
+# Local variables:
+#    mode: tcl
+#    tcl-indent-level: 4
+#    indent-tabs-mode: nil
+# End: