diff options
| -rwxr-xr-x | GradeBook_lib.tcl | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index 0a4b6d7..43bd017 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -1116,6 +1116,7 @@ proc SetSortColumn {} { proc isActionGranted { action permission_list user } { array set permission $permission_list + dbg "$user requested action $action" msg_level_info if { $action == "defaultview" } { # this one permitted to everyone dbg "requested action $action for user $user is granted" msg_level_info |