diff options
author | Peter Palfrader <peter@palfrader.org> | 2003-02-21 22:59:07 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2003-02-21 22:59:07 +0000 |
commit | 0ec9d967a969a19763dc28027cdbb3e07a544184 (patch) | |
tree | 606697d827089b287b04c3375cd312b2a6396f35 /Echolot/Chain.pm | |
parent | 4b02a94c567797329673b3f619adebdd83c4e778 (diff) |
If a chain of A:A is explicitly requested, do it - for real
Diffstat (limited to 'Echolot/Chain.pm')
-rw-r--r-- | Echolot/Chain.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Echolot/Chain.pm b/Echolot/Chain.pm index e22b154..b974ebf 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.14 2003/02/21 14:14:40 weasel Exp $ +# $Id: Chain.pm,v 1.15 2003/02/21 22:59:07 weasel Exp $ # =pod @@ -165,9 +165,9 @@ sub send_pings($;$$) { my $key1 = get_latest_key($addr1, $type1); for my $rem2 (@remailers) { - next if $rem1 eq $rem2 && (! ($which1 eq $rem1 && $which2 eq $rem2)); next unless $rem2->{'pingit'}; my $addr2 = $rem2->{'address'}; + next if $rem1 eq $rem2 && (! ($which1 eq $addr2 && $which2 eq $addr2)); next unless ( $which2 eq 'all' || |