From d30cf6685e8046f1c855a64333a42d5cb04dfa14 Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Sun, 12 Nov 2006 19:12:16 +0000
Subject: Added error handling to missing GlobalDBH case

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@529 4979c152-3d1c-0410-bac9-87ea11338e46
---
 bin/login.pl | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/bin/login.pl b/bin/login.pl
index 90de3d48..d807ed26 100755
--- a/bin/login.pl
+++ b/bin/login.pl
@@ -265,6 +265,9 @@ sub login {
 	#}
 
 
+	if (!${LedgerSMB::Sysconfig::GLOBALDBH}){
+		$locale->text("No GlobalDBH Configured or Could not Connect");
+	}
 	$user = LedgerSMB::User->new($form->{login});
 
 	# if we get an error back, bale out
-- 
cgit v1.2.3