X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FRoute%2FNode.pm;h=92501266ee24957d88c8b33a503385e0e0ef6709;hb=a597f3d1e4533abebfd844d365f2d4cb62ba33e6;hp=bd69d3d77290947af5089a73484ebc339cddbfe1;hpb=6d518a0ec42a570b512cccc2ca33b86c843c0816;p=spider.git diff --git a/perl/Route/Node.pm b/perl/Route/Node.pm index bd69d3d7..92501266 100644 --- a/perl/Route/Node.pm +++ b/perl/Route/Node.pm @@ -339,15 +339,6 @@ sub _deluser return $self->_dellist('users', @_); } -sub DESTROY -{ - my $self = shift; - my $pkg = ref $self; - my $call = $self->{call} || "Unknown"; - - dbg("destroying $pkg with $call") if isdbg('routelow'); -} - # # generic AUTOLOAD for accessors #