X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/541272c5cf4f874a13eff89993d5d4a941451f42..51fa09f29ebea609f58d14506d6938c0e0ee1ab0:/bin/mozilla/installationcheck.pl 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;