diff options
author | C.J. Adams-Collier <cjac@colliertech.org> | 2014-09-18 11:35:38 -0700 |
---|---|---|
committer | C.J. Adams-Collier <cjac@colliertech.org> | 2014-09-18 11:35:38 -0700 |
commit | d54644e17fc84f3853ca020ae68605e7900855fb (patch) | |
tree | fc5cd3bfeb614c15296fd89e47561b7bac278d3d /fs_selfservice/FS-SelfService | |
parent | dd03181dde5f641d81b5e50643bbd0f81ca09877 (diff) |
including error message, and moving session_id reset outside of the conditional block
Diffstat (limited to 'fs_selfservice/FS-SelfService')
-rwxr-xr-x | fs_selfservice/FS-SelfService/cgi/selfservice.cgi | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi index 5c0190f96..0226d1183 100755 --- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi +++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi @@ -124,14 +124,16 @@ unless ( $nologin_actions{$action} ) { 'email' => $email, 'password' => $password ); + if ( $login_rv->{'error'} ) { my $ip = $cgi->remote_addr(); - warn("login failure [email $email] [ip $ip]"); + warn("login failure [email $email] [ip $ip] [error $login_rv->{error}]"); } else { #successful login - $session_id = $login_rv->{'session_id'}; } + $session_id = $login_rv->{'session_id'}; + } else { $cgi->param('username') =~ /^\s*([a-z0-9_\-\.\&]{0,$form_max})\s*$/i; |