X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/fc1ff1a03f56176d1e84bc0345443f561426a4a7..46bc75c8:/bin/mozilla/login.pl 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