From 579d651fec0ec1688dc42e580467c4cb73121f9c Mon Sep 17 00:00:00 2001
From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Wed, 15 Jun 2011 11:34:40 +0200
Subject: [PATCH] =?utf8?q?Pre-Checks=20k=C3=B6nnen=20mit=20Exception=20end?=
 =?utf8?q?en=20(end-of-request),=20daher=20in=20eval=20{}=20packen?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

Ansonsten wurde nach jeder Anfrage der Prozess beendet, sofern ein
Pre-Check fehl schlug. Das passiert z.B., wenn die Auth-DB nicht
existiert.
---
 SL/Dispatcher.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index df8cc8344..76fcf6fb7 100644
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -180,9 +180,9 @@ sub handle_request {
     $::form->{script} = "controller.pl";
   }
 
-  pre_request_checks();
-
   eval {
+    pre_request_checks();
+
     my $session_result = $::auth->restore_session;
     $::auth->create_or_refresh_session;
 
-- 
2.20.1