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.11 -r1.12 --- openacs-4/packages/acs-subsite/lib/user-new.tcl 9 Jun 2005 18:52:10 -0000 1.11 +++ openacs-4/packages/acs-subsite/lib/user-new.tcl 14 Jun 2005 15:40:27 -0000 1.12 @@ -41,7 +41,7 @@ # Redirect to the registration assessment if there is one, if not, continue with the regular # registration form. -set url [callback -catch -impl url user::registration] +set url [callback -catch -impl asm_url user::registration] if { ![empty_string_p $url] } { ad_returnredirect "$url" Index: openacs-4/packages/assessment/tcl/callback-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/callback-procs.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/assessment/tcl/callback-procs.tcl 9 Jun 2005 20:47:59 -0000 1.1 +++ openacs-4/packages/assessment/tcl/callback-procs.tcl 14 Jun 2005 15:38:45 -0000 1.2 @@ -2,7 +2,7 @@ Callback definitions } -ad_proc -public -callback user::registration -impl url {} { +ad_proc -public -callback user::registration -impl asm_url {} { Return the properly formed link (URL) that the user will click to go into the registration process. Index: openacs-4/packages/assessment/tcl/callback-procs.xql =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/callback-procs.xql,v diff -u -r1.1 -r1.2 --- openacs-4/packages/assessment/tcl/callback-procs.xql 9 Jun 2005 20:47:59 -0000 1.1 +++ openacs-4/packages/assessment/tcl/callback-procs.xql 14 Jun 2005 15:38:45 -0000 1.2 @@ -1,7 +1,7 @@ - + select package_id from cr_folders where folder_id=(select context_id from acs_objects where object_id=:assessment_id)