diff options
author | Eugeniy Mikhailov <evgmik@gmail.com> | 2012-12-15 12:40:42 -0500 |
---|---|---|
committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2012-12-15 12:40:42 -0500 |
commit | f497fe529a8fa54ffb04b7c257eeb190b4bf53dc (patch) | |
tree | 783970e325e1c73b80f9674f2da4666f6f23db1c /GradeBook_lib.tcl | |
parent | 2d8d98b9376cb29907bf5478fc8ee96244eda8cf (diff) | |
download | GradeBook-f497fe529a8fa54ffb04b7c257eeb190b4bf53dc.tar.gz GradeBook-f497fe529a8fa54ffb04b7c257eeb190b4bf53dc.zip |
added dbg about reset password
Diffstat (limited to 'GradeBook_lib.tcl')
-rwxr-xr-x | GradeBook_lib.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index 4813786..0a4b6d7 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -1030,15 +1030,16 @@ proc askToLogin {} { } proc ResetForgottenPassword { permission_list user } { - return # FIXME work on SelectColValue4User to fix sql attack vector global script_name user_requested + dbg "$user_requested which is identified as $user asked to reset the password" msg_level_log if { [SelectColValue4User UserName $user_requested] eq "" } { htmlErrorMsg "Sorry but user {$user_requested} is not registered in this class" dbg "{$user_requested} is not registered in this class" msg_level_info return } + return #reset password procedure goes here |