Revision 8c6efb2a
Von Moritz Bunkus vor mehr als 18 Jahren hinzugefügt
SL/LXDebug.pm | ||
---|---|---|
53 | 53 |
} |
54 | 54 |
|
55 | 55 |
sub enter_sub { |
56 |
my ($self) = @_; |
|
56 |
my ($self, $level) = @_; |
|
57 |
|
|
58 |
return if $global_trace_subs < $level; |
|
57 | 59 |
|
58 | 60 |
if (!$self->{"trace_subs"} && !$global_trace_subs) { |
59 | 61 |
return; |
... | ... | |
77 | 79 |
} |
78 | 80 |
|
79 | 81 |
sub leave_sub { |
80 |
my ($self) = @_; |
|
82 |
my ($self, $level) = @_; |
|
83 |
|
|
84 |
return if $global_trace_subs < $level; |
|
81 | 85 |
|
82 | 86 |
if (!$self->{"trace_subs"} && !$global_trace_subs) { |
83 | 87 |
return; |
Auch abrufbar als: Unified diff
Trace Levels Hack. Wenn es koennen jetzt in den lxdebug->enter_sub und leave_sub Aufrufen Tracelevels uebergeben werden. Ist das global_trace_subs geringer, werden diese in den Traceausgaben ignoriert. Standardmaessig ist das jetzt bei Menu::access_control und Form::unescape der Fall.
Um (derzeit) alle Traceausgaben zu bekommen in der lx-erp.conf $global_trabce_subs = 2; setzen.
Debugausgaben entfernt.
parse_amount, format_amount und round_amount auf tracelevel 2 gesetzt. Trace breaker in parse_amount gefixt.
[Merge der Revisionen 943:945 957 aus dem LINET prog Repo]