From 6fdb5b14e9aff4db9dde4dfe1806a69ab96801c3 Mon Sep 17 00:00:00 2001
From: Eugeniy Mikhailov <evgmik@gmail.com>
Date: Wed, 19 Oct 2016 16:28:58 -0400
Subject: setting sortCol cookie in the right place

---
 GradeBook.tcl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/GradeBook.tcl b/GradeBook.tcl
index 16baac9..54e112e 100755
--- a/GradeBook.tcl
+++ b/GradeBook.tcl
@@ -74,8 +74,10 @@ set timestamp [timestamp]
 #CreateAccessRightsTable db
 dbg [::ncgi::names] msg_level_info
 # logon and logoff actions are granted to everyone
+# these actions also set cookies and should be run before ::ncgi::header
 if { $action == "logon"  } { set action [ LogMeOn ] }   
 if { $action == "logoff" } { LogMeOff;  set action defaultview } 
+if { $action == "sort"   } { SetSortColumn }
 
 #dbg "[timestamp] user $user_requested DB $coursedbfname version $VERSION from $remote_ip" msg_level_log
 
-- 
cgit v1.2.3