Index: openacs-4/packages/assessment/tcl/as-install-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-install-procs.tcl,v
diff -u -N -r1.30.2.13 -r1.30.2.14
--- openacs-4/packages/assessment/tcl/as-install-procs.tcl	27 Jan 2006 09:41:09 -0000	1.30.2.13
+++ openacs-4/packages/assessment/tcl/as-install-procs.tcl	21 Feb 2006 18:09:33 -0000	1.30.2.14
@@ -19,7 +19,11 @@
 
 inter_item_checks::apm_callback::package_install
 
+set value [parameter::get -parameter "AsmForRegisterId" -package_id [subsite::main_site_id]]
 
+if {[empty_string_p $value]} {
+    apm_parameter_register "AsmForRegisterId" "Assessment used on the registration process." "acs-subsite" "0" "number" "user-login"
+}
     
 content::type::new -content_type {as_item_choices} -supertype {content_revision} -pretty_name {Assessment Item Choice} -pretty_plural {Assessment Item Choices} -table_name {as_item_choices} -id_column {choice_id}
 content::type::new -content_type {as_item_sa_answers} -supertype {content_revision} -pretty_name {Assessment Item Answer} -pretty_plural {Assessment Item Answer} -table_name {as_item_sa_answers} -id_column {choice_id}
@@ -377,7 +381,7 @@
 	    0.10d11 0.10d12 {
 		content::type::attribute::new -content_type {as_items} -attribute_name {field_name} -datatype {string} -pretty_name {Item Field Name} -column_spec {varchar(500)}
 	    }
-	    
+    
 	    0.11 0.12 {
 		#File Upload new type
 		content::type::new -content_type {as_item_type_fu} -supertype {content_revision} -pretty_name {Assessment Item Type File Upload} -pretty_plural {Assessment Item Type File Upload} -table_name {as_item_type_fu} -id_column {as_item_type_id}