aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xGradeBook_lib.tcl6
1 files changed, 5 insertions, 1 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl
index 41fa9f1..59749a2 100755
--- a/GradeBook_lib.tcl
+++ b/GradeBook_lib.tcl
@@ -1674,7 +1674,11 @@ proc ChoseAction {action permission_list user} {
if { [isActionGranted $action $permission_list $user] } {
switch $action {
- sort { SetSortColumn; ChoseAction defaultview $permission_list $user }
+ sort {
+ # we do not need to run SetSortColumn since it is done at the very beginning
+ # before we run ::ncgi::header
+ ChoseAction defaultview $permission_list $user
+ }
addcolumn {
AddColumn $permission_list $user;
htmlDefaultView $permission_list $user