summaryrefslogtreecommitdiff
path: root/GradeBook.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'GradeBook.tcl')
-rwxr-xr-xGradeBook.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl
index 2b8984a..b684965 100755
--- a/GradeBook.tcl
+++ b/GradeBook.tcl
@@ -792,7 +792,6 @@ puts {
##################### end of procs ####################################
-::ncgi::header
set timestamp [clock format [clock seconds] -format "%Y-%m-%dT%H:%M:%S"]
@@ -806,6 +805,7 @@ if { $action == "logoff" } { LogMeOff; set action defaultview }
dbg "===== Connection at $timestamp for user $user ====="
set permission_list [AccessGroupRights db $user $password]
+::ncgi::header
htmlHeader
puts "<body>"
htmlTop $permission_list