From 4e9bb39edb29ae296b9677018553ae1becc17cef Mon Sep 17 00:00:00 2001
From: bshuttle <bshuttle@c91229c3-7414-0410-bfa2-8a42b809f60b>
Date: Tue, 12 Sep 2006 10:30:18 +0000
Subject: [PATCH] do not allow disabled users to login.

---
 lib/session/Session.inc | 4 ++++
 1 file changed, 4 insertions(+), 0 deletions(-)

diff --git a/lib/session/Session.inc b/lib/session/Session.inc
index 673c445..7f8eeb8 100644
--- a/lib/session/Session.inc
+++ b/lib/session/Session.inc
@@ -51,6 +51,10 @@ class Session {
             }
         }
         
+        if ($oUser->getDisabled()) {
+            return PEAR::raiseError("Your account has been disabled.  Please contact the system administrator for assistance.");
+        }
+        
         // bind user id to session
         $_SESSION["userID"] = $iUserId;
         $_SESSION["KTErrorMessage"] = array();
--
libgit2 0.21.4