Revision da8bd00b
Von Sven Schöling vor etwa 12 Jahren hinzugefügt
SL/LXDebug.pm | ||
---|---|---|
119 | 119 |
my ($dummy1, $self_filename, $self_line) = caller(0); |
120 | 120 |
|
121 | 121 |
my $indent = " " x --$self->{"calldepth"}; |
122 |
my $time = $self->want_request_timer ? $self->get_request_time : ''; |
|
122 |
my $time = $self->want_request_timer ? $self->get_request_time || '' : '';
|
|
123 | 123 |
|
124 | 124 |
if (!defined($package)) { |
125 | 125 |
$self->_write('sub' . $level, $indent . "/ $time top-level?\n"); |
Auch abrufbar als: Unified diff
Warnung beim Testen unterdrücken