]> www.dxcluster.org Git - spider.git/commitdiff
try and fix routing table errors
authorminima <minima>
Thu, 24 Feb 2005 17:09:31 +0000 (17:09 +0000)
committerminima <minima>
Thu, 24 Feb 2005 17:09:31 +0000 (17:09 +0000)
perl/Thingy/Rt.pm

index 89c8452ea56927a9d05bef9414efe45b870a2b4f..49f2bc616cc5167781421c13bf08b811496592d0 100644 (file)
@@ -94,14 +94,18 @@ sub handle_cf
        my %in;
        if ($thing->{n}) {
                for (split(/:/, $thing->{n})) {
-                       my ($here, $call) = unpack("A1 A*", $_); 
-                       $in{$call} = $here;
+                       my ($here, $call) = unpack("A1 A*", $_);
+                       unless ($call eq $main::mycall) {
+                               $in{$call} = $here;
+                       }
                }
        }
        if ($thing->{a}) {
                for (split(/:/, $thing->{a})) {
                        my ($here, $call) = unpack("A1 A*", $_); 
-                       $in{$call} = $here;
+                       unless ($call eq $main::mycall) {
+                               $in{$call} = $here;
+                       }
                } 
        }
        my ($del, $add) = $parent->diff_nodes(keys %in);