diff options
author | Peter Palfrader <peter@palfrader.org> | 2003-02-15 00:44:39 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2003-02-15 00:44:39 +0000 |
commit | 7adc1b95176205694c1b34878b185a41c82373e9 (patch) | |
tree | af9ad6f99465654fa431d8d10d6c5ac0551bf696 | |
parent | da4d61693f4d9ce6a0ef7616e60af7feeb1273d4 (diff) |
Do not chain ping through A,A
-rw-r--r-- | Echolot/Chain.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Echolot/Chain.pm b/Echolot/Chain.pm index 60570c8..9f08b81 100644 --- a/Echolot/Chain.pm +++ b/Echolot/Chain.pm @@ -1,7 +1,7 @@ package Echolot::Chain; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Chain.pm,v 1.1 2003/02/14 05:03:15 weasel Exp $ +# $Id: Chain.pm,v 1.2 2003/02/15 00:44:39 weasel Exp $ # =pod @@ -151,6 +151,7 @@ sub send_pings($;$$) { my $key1 = get_latest_key($addr1, $type1); for my $rem2 (@remailers) { + next if $rem1 eq $rem2; next unless $rem2->{'pingit'}; my $addr2 = $rem2->{'address'}; |