start ping work

[spider.git] / perl / Aranea.pm

diff --git a/perl/Aranea.pm b/perl/Aranea.pm
index c04534b73bacf2d2cdb2ea38a1b282275834fee8..e31b7984ffcb59914dc9bdb63a2bdfbffd65633b 100644 (file)
--- a/perl/Aranea.pm
+++ b/perl/Aranea.pm
@@ -191,7 +191,7 @@ sub per_minute
                                        # i am special but, currently, still a node
                                        my $thing = Thingy::Rt->new_cf;
                                        $thing->broadcast;
-                                       $self->lastcf($main::systime);
+                                       $dxchan->lastcf($main::systime);
                                } else {
 
                                        # i am a pc protocol node connected directly
@@ -247,7 +247,7 @@ sub disconnect
        DXProt::route_pc21($self, $main::mycall, undef, @rout) if @rout;
 
        # remove outstanding pings
-#      delete $pings{$call};
+       Thingy::Ping::forget($call);
        
        # I was the last node visited
     $self->user->node($main::mycall);