attempt to get rid of some of the useless messages on program exit

[spider.git] / perl / DXLog.pm

diff --git a/perl/DXLog.pm b/perl/DXLog.pm
index 8cc6f8504b35a842304b2443e1f3d9ac23dc3d23..2dc6d2feec4136958eb46678f953137ecf5343b5 100644 (file)
--- a/perl/DXLog.pm
+++ b/perl/DXLog.pm
@@ -177,7 +177,7 @@ sub Log
 sub DESTROY                                            # catch undefs and do what is required further down the tree
 {
        my $self = shift;
-       DXDebug::dbg("dxlog", "closing $self->{fn}\n");
+#      DXDebug::dbg("dxlog", "closing $self->{fn}\n");
        undef $self->{fh} if defined $self->{fh};
 } 
 1;