X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=bin%2Fmozilla%2Flogin.pl;h=72032f3df8a573bdf0c30cf0992077ec59865f3e;hb=afe6d1f6a6af704ffa5a0a633d92080ae784f817;hp=e6dd8e7a25648d5940e6cd90df698207451c9f06;hpb=d319704a66e9be64da837ccea10af6774c2b0838;p=kivitendo-erp.git diff --git a/bin/mozilla/login.pl b/bin/mozilla/login.pl index e6dd8e7a2..72032f3df 100644 --- a/bin/mozilla/login.pl +++ b/bin/mozilla/login.pl @@ -31,19 +31,21 @@ use DBI; use SL::User; use SL::Form; +require "bin/mozilla/common.pl"; + $form = new Form; $locale = new Locale $language, "login"; # customization -if (-f "$form->{path}/custom_$form->{script}") { - eval { require "$form->{path}/custom_$form->{script}"; }; +if (-f "bin/mozilla/custom_$form->{script}") { + eval { require "bin/mozilla/custom_$form->{script}"; }; $form->error($@) if ($@); } # per login customization -if (-f "$form->{path}/$form->{login}_$form->{script}") { - eval { require "$form->{path}/$form->{login}_$form->{script}"; }; +if (-f "bin/mozilla/$form->{login}_$form->{script}") { + eval { require "bin/mozilla/$form->{login}_$form->{script}"; }; $form->error($@) if ($@); } @@ -53,7 +55,7 @@ $form->{titlebar} = if ($form->{action}) { $form->{titlebar} .= " - $myconfig{name} - $myconfig{dbname}"; - &{ $locale->findsub($form->{action}) }; + call_sub($locale->findsub($form->{action})); } else { &login_screen; } @@ -84,14 +86,15 @@ sub login_screen {