summaryrefslogtreecommitdiff
path: root/fs_selfservice/FS-SelfService
diff options
context:
space:
mode:
authorC.J. Adams-Collier <cjac@colliertech.org>2014-09-18 11:35:38 -0700
committerC.J. Adams-Collier <cjac@colliertech.org>2014-09-18 11:35:38 -0700
commitd54644e17fc84f3853ca020ae68605e7900855fb (patch)
treefc5cd3bfeb614c15296fd89e47561b7bac278d3d /fs_selfservice/FS-SelfService
parentdd03181dde5f641d81b5e50643bbd0f81ca09877 (diff)
including error message, and moving session_id reset outside of the conditional block
Diffstat (limited to 'fs_selfservice/FS-SelfService')
-rwxr-xr-xfs_selfservice/FS-SelfService/cgi/selfservice.cgi6
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;