summaryrefslogtreecommitdiff
path: root/bin/login.pl
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-11-12 19:12:16 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2006-11-12 19:12:16 +0000
commitd30cf6685e8046f1c855a64333a42d5cb04dfa14 (patch)
treea9214922f7885225d31b2f2d7cd483b99fc6d06b /bin/login.pl
parentb7915484395a88fe3ab8f9a66abb65e73bf17437 (diff)
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
Diffstat (limited to 'bin/login.pl')
-rwxr-xr-xbin/login.pl3
1 files changed, 3 insertions, 0 deletions
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