diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2010-12-15 17:08:11 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2010-12-15 17:08:11 -0500 |
| commit | 655e6d6d3810ba7c3e27d8ea195a306f20c07672 (patch) | |
| tree | 8bb901667cb8e18880876b68651699719379312f | |
| parent | 8ba275a6039f356b41cfeff6ba08a26c01c476c4 (diff) | |
| download | GradeBook-655e6d6d3810ba7c3e27d8ea195a306f20c07672.tar.gz GradeBook-655e6d6d3810ba7c3e27d8ea195a306f20c07672.zip | |
choose action placed a bit later
darcs-hash:20101215220811-067c0-e9fb8dcbdf8bcbb3df27b10bd0d90126d618cea6.gz
| -rwxr-xr-x | GradeBook.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index cf2567d..b2dc580 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -1,6 +1,6 @@ #!/bin/sh # FILE: "/home/evmik/src/my_src/GradeBook/GradeBook.tcl" -# LAST MODIFICATION: "Wed, 15 Dec 2010 17:00:40 -0500 (evmik)" +# LAST MODIFICATION: "Wed, 15 Dec 2010 17:08:09 -0500 (evmik)" # (C) 2010 by Eugeniy Mikhailov, <evgmik@gmail.com> # $Id:$ # vim:set ft=tcl: \ @@ -298,9 +298,9 @@ if { $action == "logoff" } { LogMeOff } dbg "Connection at $timestamp for user $user" set permissions [AccessGroupRights db $user $password] -ChoseAction $action $permissions ::ncgi::header +ChoseAction $action $permissions htmlTop $permissions htmlGradesTable db $permissions $sortCol $user #htmlDBout db $sortCol |