diff options
author | Eugeniy Mikhailov <evgmik@gmail.com> | 2014-03-29 17:27:56 -0400 |
---|---|---|
committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2014-03-29 17:27:56 -0400 |
commit | 788b93da0b408e2877646219eedcd674f688d917 (patch) | |
tree | b732a49e48fef49bae840d2081c8f5c061052209 /GradeBook_lib.tcl | |
parent | ecbce6b0b728ef8347b1696bc8a6c8321bc0e1ca (diff) | |
download | GradeBook-788b93da0b408e2877646219eedcd674f688d917.tar.gz GradeBook-788b93da0b408e2877646219eedcd674f688d917.zip |
added statistics update as web action
Diffstat (limited to 'GradeBook_lib.tcl')
-rwxr-xr-x | GradeBook_lib.tcl | 3 |
1 files changed, 3 insertions, 0 deletions
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 { } |