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.10.2.4 -r1.10.2.5
--- openacs-4/packages/acs-subsite/lib/user-new.tcl	1 Jul 2005 04:40:29 -0000	1.10.2.4
+++ openacs-4/packages/acs-subsite/lib/user-new.tcl	16 Dec 2005 17:00:57 -0000	1.10.2.5
@@ -44,10 +44,10 @@
 
 set implName [parameter::get -parameter "RegistrationImplName" -package_id [subsite::main_site_id]]
 
-set url [callback -catch -impl "$implName" user::registration]
+set callback_url [callback -catch -impl "$implName" user::registration]
 
-if { ![empty_string_p $url] } {
-    ad_returnredirect [export_vars -base $url { return_url }]
+if { ![empty_string_p $callback_url] } {
+    ad_returnredirect [export_vars -base $callback_url { return_url }]
     ad_script_abort
 }