->message(0, ...) sollte wieder funktionieren

diff --git a/SL/LXDebug.pm b/SL/LXDebug.pm
index 1071ef3e7656b5ae74fc17b97c074eb9275d79e6..59a6579d27b2f56375d1d9242d8857be08501967 100644 (file)
--- a/SL/LXDebug.pm
+++ b/SL/LXDebug.pm
@@ -97,7 +97,7 @@ sub leave_sub {
 
 sub message {
   my ($self, $level, $message) = @_;
-  $self->_write(level2string($level), $message) if (($self->{"level"} | $global_level) & $level);
+  $self->_write(level2string($level), $message) if (($self->{"level"} | $global_level) & $level || !$level);
 }
 
 sub dump {