From 6e61c1289d980a1ac71e6efb4153c1145b1bfee2 Mon Sep 17 00:00:00 2001
From: Eugeniy Mikhailov <evgmik@gmail.com>
Date: Wed, 4 Dec 2013 17:39:15 -0500
Subject: update grades does not recalculate grades weights if cancel is
 selected

---
 GradeBook_lib.tcl | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

(limited to 'GradeBook_lib.tcl')

diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl
index 12d702c..572430e 100755
--- a/GradeBook_lib.tcl
+++ b/GradeBook_lib.tcl
@@ -1589,10 +1589,11 @@ proc UpdateGrades { permission_list user } {
 		if { $err } {
 			htmlErrorMsg  $errStat 
 			dbg  "the following error happen: $errStat" msg_level_critical
-		} 
+		} else {
+			calculteWeightedTotals
+		}
 	}
 
-	calculteWeightedTotals
 }
 
 proc ChangeGrades { permission_list user } {
-- 
cgit v1.2.3