Index: openacs-4/packages/assessment/lib/assessment.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/lib/assessment.tcl,v diff -u -r1.18 -r1.18.2.1 --- openacs-4/packages/assessment/lib/assessment.tcl 2 Dec 2006 21:17:28 -0000 1.18 +++ openacs-4/packages/assessment/lib/assessment.tcl 26 Jan 2007 00:33:57 -0000 1.18.2.1 @@ -149,7 +149,7 @@ } as::section_data::new -section_id $section_id -session_id $session_id -subject_id $user_id -package_id $assessment_package_id - ns_log notice "Assessment section_id='${section_id}' session_id='${session_id}' assessnent='${assessment_rev_id}'" +# ns_log notice "Assessment section_id='${section_id}' session_id='${session_id}' assessnent='${assessment_rev_id}'" db_1row section_data {} -column_array section set display_type_id $section(display_type_id) if {![empty_string_p $display_type_id]} { @@ -192,7 +192,7 @@ if { ![exists_and_not_null item_order] } { set item_order 0 } # add 1 because we want to compare the 1 indexed display number # to the current page - ns_log notice "page_display_per_page = '${page_display_per_page}'" +# ns_log notice "page_display_per_page = '${page_display_per_page}'" set current_page [expr {$item_order / $page_display_per_page + 1}] # strip away items on previous section pages