X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/b2cb10d18d5d631846fc6011937243d0d709f1c7..8fac2b08f248b7db54c6937c2ab154805aae63d4:/SL/LXDebug.pm

diff --git a/SL/LXDebug.pm b/SL/LXDebug.pm
index 43ad76a99..e3778d44f 100644
--- a/SL/LXDebug.pm
+++ b/SL/LXDebug.pm
@@ -245,6 +245,12 @@ sub end_request {
   $self->{calldepth} = 0;
 }
 
+sub log_time {
+  my $self = shift;
+  return 1 unless want_request_timer();
+  $self->_write("time", $self->get_request_time);
+}
+
 sub get_request_time {
   my $self = shift;
   return $self->want_request_timer && $self->{request_start} ? tv_interval($self->{request_start}) : undef;