Index: openacs-4/packages/dotlrn-catalog/lib/course-chunk.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/lib/course-chunk.tcl,v diff -u -r1.8 -r1.8.2.1 --- openacs-4/packages/dotlrn-catalog/lib/course-chunk.tcl 10 May 2005 14:14:52 -0000 1.8 +++ openacs-4/packages/dotlrn-catalog/lib/course-chunk.tcl 31 May 2005 23:13:08 -0000 1.8.2.1 @@ -31,12 +31,12 @@ } set category_p [db_string get_category { } -default -1] + set info [ad_html_text_convert -from text/enhanced -to text/plain $info] -set reg_asm_id [parameter::get -parameter AsmForRegisterId -package_id [ad_conn subsite_id]] + set cc_package_id [apm_package_id_from_key "dotlrn-catalog"] set tree_id [db_string get_tree_id { } -default "-1"] - # Get the category name set category_name "[category::get_name [category::get_mapped_categories $course_id]]" @@ -132,15 +132,8 @@ } } -#Send the registration assessment_id -set reg_chunck "assessment_id=$asmid" -if { ![string eq $reg_asm_id 0] } { - if { [ad_conn user_id] == 0} { - set reg_chunck "assessment_id=$reg_asm_id&next_asm=$asmid" - } -} @@ -154,5 +147,3 @@ - -