diff options
-rwxr-xr-x | GradeBook.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index 9292cd3..916ce47 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -327,9 +327,9 @@ proc LogMeOn {} { proc LogMeOff {} { dbg "Logging off" 4 global user password - set user guest - set password guest - ::ncgi::setCookie -name user -value $user + #set user guest + set password {} + #::ncgi::setCookie -name user -value $user ::ncgi::setCookie -name password -value $password } |