X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Finstallationcheck.pl;h=ca8c7895a1ff8150337ae9e63e8ed4c856102837;hb=2c1c6a9a9204afad82c8e403f3fce1d0d4b9cd90;hp=6e1dfc6b42a0b108860a2e788a3e8eeb6b10de70;hpb=541272c5cf4f874a13eff89993d5d4a941451f42;p=kivitendo-erp.git diff --git a/bin/mozilla/installationcheck.pl b/bin/mozilla/installationcheck.pl index 6e1dfc6b4..ca8c7895a 100644 --- a/bin/mozilla/installationcheck.pl +++ b/bin/mozilla/installationcheck.pl @@ -1,16 +1,23 @@ use SL::InstallationCheck; +use strict; + sub verify_installation { my $script = $0; $script =~ s|.*/||; - return unless ($form{"action"} && ($script eq "login.pl")); + my $form = $main::form; + + return unless ($form->{"action"} && ($script eq "login.pl")); + + SL::InstallationCheck::check_for_conditional_dependencies(); my @missing_modules = SL::InstallationCheck::test_all_modules(); return if (scalar(@missing_modules) == 0); use SL::Locale; - my $locale = new Locale($language, "installationcheck"); + + my $locale = new Locale($::lx_office_conf{system}->{language}, "installationcheck"); print(qq|content-type: text/html @@ -79,7 +86,8 @@ sub verify_installation { |); - exit(0); + + ::end_of_request(); } 1;