X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/ee072e4f077213bf6f8792ca8f0a1afebbb6282f..3f65b4fbe2856d5ab0a6a4ccee20c1a44d9d0cd1:/login.pl diff --git a/login.pl b/login.pl index c1d4df406..f49163362 100755 --- a/login.pl +++ b/login.pl @@ -30,6 +30,10 @@ # ####################################################################### +BEGIN { + push(@INC, "modules"); +} + # setup defaults, DO NOT CHANGE $userspath = "users"; $templates = "templates"; @@ -74,6 +78,9 @@ Login disabled!\n"; exit; } +require "bin/mozilla/installationcheck.pl"; +verify_installation(); + if ($form{path}) { $form{path} =~ s/%2f/\//gi; $form{path} =~ s/\.\.\///g; @@ -97,9 +104,6 @@ Invalid path!\n"; $form{terminal} = "mozilla"; } - if ($ENV{HTTP_USER_AGENT} =~ /lynx/i) { - $form{terminal} = "lynx"; - } } else { if ($ENV{TERM} =~ /xterm/) { $form{terminal} = "xterm";