X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=SL%2FLXDebug.pm;h=4bb4203980e4b81fb8ac58f1d2d1d291525f5ab4;hb=98ad02ca3b8d9e9c00775b4768e7060388efbed1;hp=ee70d03f53caec161299106b733bcd0449a13eef;hpb=20a083051185f1ec54d8a1b40bd64744dacc8790;p=kivitendo-erp.git diff --git a/SL/LXDebug.pm b/SL/LXDebug.pm index ee70d03f5..4bb420398 100644 --- a/SL/LXDebug.pm +++ b/SL/LXDebug.pm @@ -57,7 +57,7 @@ sub enter_sub { my ($self, $level) = @_; $level *= 1; - check_watched_form_variables(); + $self->check_watched_form_variables(); return 1 unless ($global_level & TRACE); # ignore if traces aren't active return 1 if $level && !($global_level & $level); # ignore if level of trace isn't active @@ -102,6 +102,8 @@ sub leave_sub { sub message { my ($self, $level, $message) = @_; + + $self->check_watched_form_variables(); $self->_write(level2string($level), $message) if (($self->{"level"} | $global_level) & $level || !$level); }