From: C.J. Adams-Collier <cjac@colliertech.org>
Date: Thu, 18 Sep 2014 18:35:38 +0000 (-0700)
Subject: including error message, and moving session_id reset outside of the conditional block
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=05a99e84eb795dcf19cda5133a4a89a1976fedfc

including error message, and moving session_id reset outside of the conditional block

Conflicts:
	fs_selfservice/FS-SelfService/cgi/selfservice.cgi
---

diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
index 1ec5c0bea..4e21ad8df 100755
--- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
+++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi
@@ -124,7 +124,15 @@ unless ( $nologin_actions{$action} ) {
           'email'    => $email,
           'password' => $password
         );
-        $session_id = $login_rv->{'session_id'};
+
+	if ( $login_rv->{'error'} ) {
+	  my $ip = $cgi->remote_addr();
+	  warn("login failure [email $email] [ip $ip] [error $login_rv->{error}]");
+	} else {
+	  #successful login
+	}
+
+	$session_id = $login_rv->{'session_id'};
 
       } else {