From 2b927b2b390677e4f3cad75c8fb9966c1f0b2c9b Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Tue, 8 Jul 2003 23:51:37 +0000
Subject: Fix chain pinging type Type I

---
 Echolot/Chain.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Echolot/Chain.pm')

diff --git a/Echolot/Chain.pm b/Echolot/Chain.pm
index 3e42be5..5bff365 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.17 2003/06/09 18:57:41 weasel Exp $
+# $Id: Chain.pm,v 1.18 2003/07/08 23:51:37 weasel Exp $
 #
 
 =pod
@@ -138,7 +138,7 @@ sub send_pings($;$$) {
 			my $type;
 			my %supports = map { $_ => 1 } Echolot::Globals::get()->{'storage'}->get_types($addr);
 			for my $thistype (@{Echolot::Config::get()->{'which_chainpings'}->{$chaintype}}) {
-				$type = $thistype, last if $supports{$chaintype};
+				$type = $thistype, last if $supports{$thistype};
 			};
 			next unless $type;
 			my $key;
-- 
cgit v1.2.3