X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=bin%2Fmozilla%2Flogin.pl;h=72032f3df8a573bdf0c30cf0992077ec59865f3e;hb=d6bf475aee947e7451eb9b797ed0ad5ab5bcf6f8;hp=770df5ce361b669d591d1f14b11b299b6d717e3e;hpb=a7ae494b2e73b5a2aa38f650ff5d136362071692;p=kivitendo-erp.git diff --git a/bin/mozilla/login.pl b/bin/mozilla/login.pl index 770df5ce3..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; } @@ -105,7 +107,6 @@ sub login_screen {