From 9fa08eda8b3df551daf90363a8148ac1679b8c1b Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Thu, 2 Jan 2003 23:58:53 +0000
Subject: Fix unused variable warning

---
 Echolot/Conf.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Echolot')

diff --git a/Echolot/Conf.pm b/Echolot/Conf.pm
index d40adb1..18dac22 100644
--- a/Echolot/Conf.pm
+++ b/Echolot/Conf.pm
@@ -1,7 +1,7 @@
 package Echolot::Conf;
 
 # (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: Conf.pm,v 1.32 2003/01/02 23:51:15 weasel Exp $
+# $Id: Conf.pm,v 1.33 2003/01/02 23:58:53 weasel Exp $
 #
 
 =pod
@@ -168,6 +168,7 @@ sub remailer_caps($$$;$) {
 			last if ($head eq 'SUPPORTED CPUNK (TYPE I) REMAILERS' ||
 				 $head eq 'SUPPORTED MIXMASTER (TYPE II) REMAILERS');
 		};
+		last unless defined $head;
 		my $wanting = $head eq 'SUPPORTED CPUNK (TYPE I) REMAILERS' ? 1 :
 		              $head eq 'SUPPORTED MIXMASTER (TYPE II) REMAILERS' ? 2 :
 		              undef;
-- 
cgit v1.2.3