diff options
-rwxr-xr-x | GradeBook_lib.tcl | 6 |
1 files 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 } } } |