Upgrade-Script für alte SQL-Ledger -> Lx-Office 1.0 entfernt

[mfinanz.git] / SL / Dispatcher.pm

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index 4b25ca749fd20a07de2c3fd11db1a052fc5170cf..8329c5b75abb0406b141582968514f96e108d0a9 100644 (file)
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -235,7 +235,7 @@ sub handle_request {
   eval {
     pre_request_checks(script => $script, action => $action, routing_type => $routing_type, script_name => $script_name);
 
   eval {
     pre_request_checks(script => $script, action => $action, routing_type => $routing_type, script_name => $script_name);
 

-    if (   (-e ($::lx_office_conf{paths}->{userspath} . "/nologin"))
+    if (   SL::System::InstallationLock->is_locked

         && !is_admin_request(script => $script, script_name => $script_name, routing_type => $routing_type)) {
       $::form->error($::locale->text('System currently down for maintenance!'));
     }
         && !is_admin_request(script => $script, script_name => $script_name, routing_type => $routing_type)) {
       $::form->error($::locale->text('System currently down for maintenance!'));
     }