aboutsummaryrefslogtreecommitdiff
path: root/GradeBook_lib.tcl
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2012-12-15 12:40:42 -0500
committerEugeniy Mikhailov <evgmik@gmail.com>2012-12-15 12:40:42 -0500
commitf497fe529a8fa54ffb04b7c257eeb190b4bf53dc (patch)
tree783970e325e1c73b80f9674f2da4666f6f23db1c /GradeBook_lib.tcl
parent2d8d98b9376cb29907bf5478fc8ee96244eda8cf (diff)
downloadGradeBook-f497fe529a8fa54ffb04b7c257eeb190b4bf53dc.tar.gz
GradeBook-f497fe529a8fa54ffb04b7c257eeb190b4bf53dc.zip
added dbg about reset password
Diffstat (limited to 'GradeBook_lib.tcl')
-rwxr-xr-xGradeBook_lib.tcl3
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