X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=bin%2Fmozilla%2Flogin.pl;h=72032f3df8a573bdf0c30cf0992077ec59865f3e;hb=8365e092eb2088a8c2ebba604783555a13dc2a57;hp=e88872113808af90cbf6a61d87065bbbb69b9ad2;hpb=de763d70b4b2e0501565e579fb4726e033594589;p=kivitendo-erp.git diff --git a/bin/mozilla/login.pl b/bin/mozilla/login.pl index e88872113..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; } @@ -91,6 +93,8 @@ sub login_screen {