Index: openacs-4/packages/acs-subsite/lib/user-new.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/lib/user-new.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/packages/acs-subsite/lib/user-new.tcl	14 Jun 2005 15:40:27 -0000	1.12
+++ openacs-4/packages/acs-subsite/lib/user-new.tcl	15 Jun 2005 18:02:26 -0000	1.13
@@ -41,10 +41,14 @@
 # Redirect to the registration assessment if there is one, if not, continue with the regular
 # registration form.
 
-set url [callback -catch -impl asm_url user::registration]
 
+set implName [parameter::get -parameter "RegImplName" -package_id [subsite::main_site_id]]
+
+set url [callback -catch -impl "$implName" user::registration]
+
 if { ![empty_string_p $url] } {
     ad_returnredirect "$url"
+
 }