Index: openacs-4/packages/xowf/tcl/test-item-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xowf/tcl/test-item-procs.tcl,v diff -u -r1.7.2.94 -r1.7.2.95 --- openacs-4/packages/xowf/tcl/test-item-procs.tcl 6 Dec 2020 15:34:21 -0000 1.7.2.94 +++ openacs-4/packages/xowf/tcl/test-item-procs.tcl 8 Dec 2020 15:37:26 -0000 1.7.2.95 @@ -3157,7 +3157,7 @@ :public object method grade {-achieved_points:required} { if {[dict exists $achieved_points achievedPoints]} { set achieved [format %.2f [dict get $achieved_points achievedPoints]] - ns_log notice "XXXX $achieved_points -> [list calc_grade -points $achieved -achieved_points $achieved_points]" + #ns_log notice "XXXX $achieved_points -> [list calc_grade -points $achieved -achieved_points $achieved_points]" return [:calc_grade -points $achieved -achieved_points $achieved_points] } }