Revision 3ac44613
Von Sven Schöling vor mehr als 14 Jahren hinzugefügt
SL/LXDebug.pm | ||
---|---|---|
$self->{level} & ~ TRACE;
|
||
}
|
||
|
||
sub is_tracing_enabled {
|
||
my ($self) = @_;
|
||
return $self->{level} & TRACE;
|
||
}
|
||
|
||
sub _write {
|
||
my ($self, $prefix, $message) = @_;
|
||
my $date = strftime("%Y-%m-%d %H:%M:%S $$ ${prefix}: ", localtime(time()));
|
Auch abrufbar als: Unified diff
Funktion um abzufragen ob Tracing aktiviert ist.