X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Flogin.pl;h=0bfd39cb38864827275fed20289e80b8ebf1bcf1;hb=5c41c19b68c3edeb374b32fd75ac4253aafc4df1;hp=665cb9193a6fecb14c91d9c9972a70712c305b24;hpb=adf1b8cbb7c9b2b49e73256ea66c6fed00e8466e;p=kivitendo-erp.git diff --git a/bin/mozilla/login.pl b/bin/mozilla/login.pl index 665cb9193..0bfd39cb3 100644 --- a/bin/mozilla/login.pl +++ b/bin/mozilla/login.pl @@ -61,14 +61,13 @@ sub run { $action = 'login'; } if ($action) { - %::myconfig = $auth->read_user($form->{login}) if ($form->{login}); + %::myconfig = $auth->read_user(login => $form->{login}) if ($form->{login}); $::locale = Locale->new($::myconfig{countrycode}) if $::myconfig{countrycode}; if (SL::Auth::OK != $auth->authenticate($::myconfig{login}, $form->{password})) { $form->{error_message} = $::locale->text('Incorrect username or password!'); login_screen(); } else { - $auth->store_credentials_in_session(login => $form->{login}, password => $form->{password}); $auth->create_or_refresh_session(); delete $form->{password}; @@ -106,7 +105,7 @@ sub login { ::end_of_request(); } - my $user = new User $form->{login}; + my $user = User->new(login => $form->{login}); # if we get an error back, bale out my $result; @@ -168,7 +167,7 @@ sub company_logo { $form->{todo_list} = create_todo_list('login_screen' => 1) if (!$form->{no_todo_list}); $form->{stylesheet} = $myconfig{stylesheet}; - $form->{title} = $::locale->text('Lx-Office'); + $form->{title} = $::locale->text('kivitendo'); $form->{interface} = $::dispatcher->interface_type; # create the logo screen