From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Tue, 22 Jul 2008 09:42:23 +0000 (+0000)
Subject: Weitere Unterfunktionen tracen lassen.
X-Git-Tag: release-2.6.0beta1~46
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=02d89fd6d97ae79e824d4d4c969e0ce0a2fed670;p=kivitendo-erp.git

Weitere Unterfunktionen tracen lassen.
---

diff --git a/SL/Form.pm b/SL/Form.pm
index 5d00a1c90..71fadb515 100644
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -771,6 +771,8 @@ sub parse_html_template {
 }
 
 sub show_generic_error {
+  $main::lxdebug->enter_sub();
+
   my ($self, $error, %params) = @_;
 
   my $add_params = {
@@ -797,10 +799,14 @@ sub show_generic_error {
   $self->header();
   print $self->parse_html_template("generic/error", $add_params);
 
+  $main::lxdebug->leave_sub();
+
   die("Error: $error\n");
 }
 
 sub show_generic_information {
+  $main::lxdebug->enter_sub();
+
   my ($self, $text, $title) = @_;
 
   my $add_params = {
@@ -813,6 +819,8 @@ sub show_generic_information {
   $self->header();
   print $self->parse_html_template("generic/information", $add_params);
 
+  $main::lxdebug->leave_sub();
+
   die("Information: $error\n");
 }