X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/3ac44613aaf706c083d74bee399ee445420a5f54..7de1491136d15c9809b4aaf444c08cafeadaa1dc:/SL/LXDebug.pm

diff --git a/SL/LXDebug.pm b/SL/LXDebug.pm
index 059e0ca5e..f9dfa9836 100644
--- a/SL/LXDebug.pm
+++ b/SL/LXDebug.pm
@@ -192,17 +192,17 @@ sub dump_sql_result {
 
 sub enable_sub_tracing {
   my ($self) = @_;
-  $self->{level} | TRACE;
+  $global_level |= TRACE;
 }
 
 sub disable_sub_tracing {
   my ($self) = @_;
-  $self->{level} & ~ TRACE;
+  $global_level &= ~ TRACE;
 }
 
 sub is_tracing_enabled {
   my ($self) = @_;
-  return $self->{level} & TRACE;
+  return $global_level & TRACE;
 }
 
 sub _write {