diff options
author | Eugeniy Mikhailov <evgmik@gmail.com> | 2014-03-29 16:26:58 -0400 |
---|---|---|
committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2014-03-29 16:26:58 -0400 |
commit | 2a1dc4271f052d91d095a8845a4e9bd7413a320f (patch) | |
tree | e38c7a0977cb2eb57da37da8d9265eef4fa9f45f /GradeBook_lib.tcl | |
parent | e3768b65f78d69dc9d39d971957e122eb19401f8 (diff) | |
download | GradeBook-2a1dc4271f052d91d095a8845a4e9bd7413a320f.tar.gz GradeBook-2a1dc4271f052d91d095a8845a4e9bd7413a320f.zip |
proc change to a more general name
Diffstat (limited to 'GradeBook_lib.tcl')
-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 } } } |