Index: openacs-4/packages/acs-subsite/www/register/user-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/register/user-new.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/acs-subsite/www/register/user-new.tcl	31 Oct 2003 09:04:12 -0000	1.18
+++ openacs-4/packages/acs-subsite/www/register/user-new.tcl	6 Oct 2006 13:20:57 -0000	1.19
@@ -6,3 +6,8 @@
     {email ""}
     {return_url [ad_pvt_home]}
 }
+
+set registration_url [parameter::get -parameter RegistrationRedirectUrl]
+if {![string eq "" $registration_url]} {
+    ad_returnredirect $registration_url
+}
\ No newline at end of file