From 2a1dc4271f052d91d095a8845a4e9bd7413a320f Mon Sep 17 00:00:00 2001 From: Eugeniy Mikhailov Date: Sat, 29 Mar 2014 16:26:58 -0400 Subject: proc change to a more general name --- GradeBook_lib.tcl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index ce01fd1..4bc29e7 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -1897,7 +1897,7 @@ proc UpdateColumnLowestGrade { columnname } { UpdateColValue4UserNameNonWeb $columnname _The_Lowest_Grade_ $val } -proc UpdateHighLowForColumn { columnname } { +proc UpdateColumnStatistic { columnname } { set all_column_names [getColListFromTable GradesTable] if { $columnname ni $all_column_names } { return @@ -1912,7 +1912,7 @@ proc UpdateHighLowForColumn { columnname } { } else { set root_category_column "Grand Total" } - UpdateHighLowForColumn $root_category_column + UpdateColumnStatistic $root_category_column } proc UpdateGrades { permission_list user } { @@ -1937,7 +1937,7 @@ proc UpdateGrades { permission_list user } { dbg "the following error happen: $errStat" msg_level_critical } else { calculteWeightedTotals - UpdateHighLowForColumn $columnname + UpdateColumnStatistic $columnname } } } -- cgit v1.2.3