X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXCluster.pm;h=c0ec375a88f56eabc3fe39e2fce91417564ae0af;hb=3ba4a53a0fae7b6135ee9b8cd0ab4bbe352b4bdc;hp=021ff7f270875b3e0ea2cbab2e11609bc8c2e43e;hpb=5ed3964b50ca394ae47d335b70bc8282c037fe77;p=spider.git

diff --git a/perl/DXCluster.pm b/perl/DXCluster.pm
index 021ff7f2..c0ec375a 100644
--- a/perl/DXCluster.pm
+++ b/perl/DXCluster.pm
@@ -136,11 +136,11 @@ sub cluster
 	return " $DXNode::nodes nodes, $users local / $tot total users  Max users $DXNode::maxusers  Uptime $uptime";
 }
 
-sub DESTROY
-{
-	my $self = shift;
-	dbg('cluster', "destroying $self->{call}\n");
-}
+#sub DESTROY
+#{
+#	my $self = shift;
+#	dbg('cluster', "destroying $self->{call}\n");
+#}
 
 no strict;
 sub AUTOLOAD