# GNU General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
-# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
+# MA 02110-1335, USA.
#######################################################################
-use DBI;
-use SL::Auth;
-use SL::User;
+use SL::DB::Default;
use SL::Form;
use SL::Git;
+use DateTime;
require "bin/mozilla/common.pl";
require "bin/mozilla/todo.pl";
use strict;
-our $cgi;
our $form;
our $auth;
$main::lxdebug->enter_sub();
my %myconfig = %main::myconfig;
- $form->{todo_list} = create_todo_list('login_screen' => 1) if (!$form->{no_todo_list}) and ($main::auth->check_right($form->{login}, 'productivity'));
+ $form->{todo_list} = create_todo_list('login_screen' => 1) if (!$::request->is_mobile) and (!$form->{no_todo_list}) and ($main::auth->check_right($::myconfig{login}, 'productivity'));
$form->{stylesheet} = $myconfig{stylesheet};
$form->{title} = $::locale->text('kivitendo');
$form->{interface} = $::dispatcher->interface_type;
+ $form->{client} = $::auth->client;
+ $form->{defaults} = SL::DB::Default->get;
my $git = SL::Git->new;
($form->{git_head}) = $git->get_log(since => 'HEAD~1', until => 'HEAD') if $git->is_git_installation;
+ $form->{xmas} = '_xmas' if (DateTime->today->month == 12 && DateTime->today->day < 27);
+ $form->{xmas} = '_mir' if (DateTime->today->month >= 03 && DateTime->today->year == 2022
+ && DateTime->today->month <= 05);
+ $form->{xmas} = '_mir' if (DateTime->today->day == 24 && DateTime->today->month == 2);
# create the logo screen
$form->header() unless $form->{noheader};
- print $form->parse_html_template('login/company_logo');
+ print $form->parse_html_template('login/company_logo', { version => $::form->read_version });
$main::lxdebug->leave_sub();
}