From 788b93da0b408e2877646219eedcd674f688d917 Mon Sep 17 00:00:00 2001
From: Eugeniy Mikhailov <evgmik@gmail.com>
Date: Sat, 29 Mar 2014 17:27:56 -0400
Subject: added statistics update as web action

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

diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl
index f2ef344..1f3ae46 100755
--- a/GradeBook_lib.tcl
+++ b/GradeBook_lib.tcl
@@ -1468,6 +1468,8 @@ proc ChoseAction {action permission_list user} {
 			changegroupname   { ChangeGroupName  $permission_list  $user }
 			setgroupname      { SetGroupName  $permission_list  $user 
 				           htmlDefaultView    $permission_list  $user }
+			update_grades_stats { UpdateGradesTableStatistic $permission_list  $user
+				           htmlDefaultView    $permission_list  $user }
 			defaultview      { htmlDefaultView    $permission_list  $user }
 			default          { htmlErrorMsg "requested action <b>$action</b> is granted but not implemented yet" }
 		}	
@@ -2170,6 +2172,7 @@ proc ShowControls { permission_list user } {
 			editnewuserinfo "Add new user"\
 			choosenewpassword "Choose new password"\
 			edit_grades_categories "Edit Grades Categories and Weights"\
+			update_grades_stats "Update Statistics"\
 			logoff "Logoff"\
 		]
 	set separator { }
-- 
cgit v1.2.3