X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXLog.pm;h=3a6e0e3589ec86b3b53ff00cb665e804b80299e0;hb=099c6b4a10d9f1e7471b0c94273cd992b5814cdc;hp=96b39971091563c21b5eb08a9498a03e94b09f7d;hpb=cce345b95c555a0b45218c5b452bc0f5f4f13bab;p=spider.git diff --git a/perl/DXLog.pm b/perl/DXLog.pm index 96b39971..3a6e0e35 100644 --- a/perl/DXLog.pm +++ b/perl/DXLog.pm @@ -176,7 +176,7 @@ sub Log $log->writeunix($t, join('^', $t, @_) ); } -sub DESTROY # catch undefs and do what is required further do the tree +sub DESTROY # catch undefs and do what is required further down the tree { my $self = shift; DXDebug::dbg("dxlog", "closing $self->{fn}\n");