diff options
author | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-01-26 00:51:33 -0500 |
---|---|---|
committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-01-26 00:51:33 -0500 |
commit | 5ac82bbf41a2b6ffb394d1b4ed8db9a02b9ad5bd (patch) | |
tree | 539a0820ed7f5e79d6b16adf6a197e9085aefb7f /GradeBook.tcl | |
parent | 5f524625f4fb3e6e1fdb370b0b6e0ca31c73822f (diff) | |
download | GradeBook-5ac82bbf41a2b6ffb394d1b4ed8db9a02b9ad5bd.tar.gz GradeBook-5ac82bbf41a2b6ffb394d1b4ed8db9a02b9ad5bd.zip |
added reset password action
Ignore-this: 1519912052aa3ae64c7127d45652a04
darcs-hash:20110126055133-067c0-b4431aab38d114336ef2b67d08378d9fe59e134d.gz
Diffstat (limited to 'GradeBook.tcl')
-rwxr-xr-x | GradeBook.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index c33c2df..0389cb0 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -43,7 +43,7 @@ set timestamp [clock format [clock seconds] -format "%Y-%m-%dT%H:%M:%S"] #CreateAccessRightsTable db dbg [::ncgi::names] 4 # logon and logoff actions are granted to everyone -if { $action == "logon" } { LogMeOn; set action defaultview } +if { $action == "logon" } { set action [ LogMeOn ] } if { $action == "logoff" } { LogMeOff; set action defaultview } |