From 193b1e4e590fd0eb49606dea36130c72e70eee05 Mon Sep 17 00:00:00 2001
From: =?utf8?q?Sven=20Sch=C3=B6ling?= <s.schoeling@linet-services.de>
Date: Wed, 21 Jul 2010 14:48:04 +0200
Subject: [PATCH] Disptcher->require_maincode tracing gegeben.

---
 SL/Dispatcher.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/SL/Dispatcher.pm b/SL/Dispatcher.pm
index 8c450ad77..e5a7daab8 100644
--- a/SL/Dispatcher.pm
+++ b/SL/Dispatcher.pm
@@ -94,6 +94,7 @@ sub pre_startup {
 }
 
 sub require_main_code {
+  $::lxdebug->enter_sub;
   my ($script, $suffix) = @_;
 
   eval {
@@ -115,6 +116,7 @@ sub require_main_code {
     };
     $::form->error($EVAL_ERROR) if ($EVAL_ERROR);
   }
+  $::lxdebug->leave_sub;
 }
 
 sub handle_request {
-- 
2.20.1