diff options
| -rwxr-xr-x | GradeBook.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index 59b1945..7e0fae4 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -98,9 +98,9 @@ lappend logEntry sortCol [::json::write string "$sortCol"] lappend logEntry programVersion [::json::write string "$VERSION"] lappend logEntry logLevel [::json::write string msg_level_log] -set logEntryString [json::write object {*}$logEntry] +set logEntryJsonString [json::write object {*}$logEntry] set fid [open $GradebookServerConfig(log_file) a+] -puts $fid "$logEntryString" +puts $fid "$logEntryJsonString" close $fid |