diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2012-12-12 22:02:23 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2012-12-12 22:02:23 -0500 |
| commit | a6b673042f66ac33c0913d1780e3e3221139dfa7 (patch) | |
| tree | ccf7a7ff8c21f5f3948a6de2f323c9d7912a00a2 /GradeBook.tcl | |
| parent | d98976ff6f8a8843032964b3404a8d4c72c51384 (diff) | |
| download | GradeBook-a6b673042f66ac33c0913d1780e3e3221139dfa7.tar.gz GradeBook-a6b673042f66ac33c0913d1780e3e3221139dfa7.zip | |
log message changed to show user categoryv2.0.5
Diffstat (limited to 'GradeBook.tcl')
| -rwxr-xr-x | GradeBook.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index e66e212..4e45040 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -64,7 +64,7 @@ set script_name "$script_name/$coursedbfname" -set timestamp [clock format [clock seconds] -format "%Y-%m-%dT%H:%M:%S"] +set timestamp [timestamp] #CreateGradesTable db #CreateAccessRightsTable db @@ -73,12 +73,12 @@ dbg [::ncgi::names] msg_level_info if { $action == "logon" } { set action [ LogMeOn ] } if { $action == "logoff" } { LogMeOff; set action defaultview } -dbg "$timestamp user $user_requested DB $coursedbfname version $VERSION from $remote_ip" msg_level_log +#dbg "[timestamp] user $user_requested DB $coursedbfname version $VERSION from $remote_ip" msg_level_log ::ncgi::header set user [ Authenticate_User $user_requested $password ] -dbg "Requested user $user_requested logged in as $user" msg_level_info +dbg "[timestamp] authenticated user $user_requested DB $coursedbfname as $user version $VERSION from $remote_ip" msg_level_log set dbfile "$GradebookServerConfig(grades_db_dir)/$coursedbfname" if { [file exists $dbfile] && ("$coursedbfname" ne "") } { |