aboutsummaryrefslogtreecommitdiff
path: root/GradeBook.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'GradeBook.tcl')
-rwxr-xr-xGradeBook.tcl3
1 files changed, 2 insertions, 1 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl
index 5ae7470..6f5384c 100755
--- a/GradeBook.tcl
+++ b/GradeBook.tcl
@@ -803,6 +803,8 @@ puts {
##################### end of procs ####################################
+::ncgi::header
+
set timestamp [clock format [clock seconds] -format "%Y-%m-%dT%H:%M:%S"]
#CreatePasswordsTable db
@@ -816,7 +818,6 @@ 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