summaryrefslogtreecommitdiff
path: root/bin/login.pl
diff options
context:
space:
mode:
Diffstat (limited to 'bin/login.pl')
-rwxr-xr-xbin/login.pl3
1 files changed, 2 insertions, 1 deletions
diff --git a/bin/login.pl b/bin/login.pl
index a3a70b9b..2ef1c8aa 100755
--- a/bin/login.pl
+++ b/bin/login.pl
@@ -47,7 +47,8 @@ use LedgerSMB::Locale;
$form = new Form;
-$locale = LedgerSMB::Locale->get_handle(${LedgerSMB::Sysconfig::language});
+$locale = LedgerSMB::Locale->get_handle(${LedgerSMB::Sysconfig::language}) or
+ $form->error("Locale not loaded: $!\n");
$locale->encoding('UTF-8');
$form->{charset} = 'UTF-8';
#$form->{charset} = $locale->encoding;