X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/152d10ef2e2ba3ef1c1849842f2cb2ea04d9d47b..606032ad1617f22d19e7113c40b620b9efaa5286:/bin/mozilla/login.pl

diff --git a/bin/mozilla/login.pl b/bin/mozilla/login.pl
index caf49c44e..7971c2da8 100644
--- a/bin/mozilla/login.pl
+++ b/bin/mozilla/login.pl
@@ -46,7 +46,7 @@ sub company_logo {
   $main::lxdebug->enter_sub();
 
   my %myconfig = %main::myconfig;
-  $form->{todo_list}  =  create_todo_list('login_screen' => 1) if (!$form->{no_todo_list});
+  $form->{todo_list}  =  create_todo_list('login_screen' => 1) if (!$form->{no_todo_list}) and ($main::auth->check_right($form->{login}, 'productivity'));
 
   $form->{stylesheet} =  $myconfig{stylesheet};
   $form->{title}      =  $::locale->text('kivitendo');