Index: openacs-4/packages/acs-subsite/www/admin/set-reg-assessment.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/admin/Attic/set-reg-assessment.tcl,v
diff -u -N -r1.6 -r1.7
--- openacs-4/packages/acs-subsite/www/admin/set-reg-assessment.tcl	7 Apr 2005 18:02:28 -0000	1.6
+++ openacs-4/packages/acs-subsite/www/admin/set-reg-assessment.tcl	8 Apr 2005 22:58:50 -0000	1.7
@@ -58,7 +58,7 @@
 	    ad_returnredirect "${url}asm-admin/one-a?assessment_id=$assessment_id&reg_p=1"
 	}
     }  else {
-	parameter::set_value -package_id [ad_conn package_id] -parameter AsmForRegisterId -value $assessment_id
+	parameter::set_value -package_id [ad_conn subsite_id] -parameter AsmForRegisterId -value $assessment_id
 	ad_returnredirect ""
     }
 }