diff options
author | Peter Palfrader <peter@palfrader.org> | 2003-01-02 23:58:53 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2003-01-02 23:58:53 +0000 |
commit | 9fa08eda8b3df551daf90363a8148ac1679b8c1b (patch) | |
tree | ed321be6474b63a23ce01876974e4301f38705e4 /Echolot | |
parent | 71a0692245e22851faab82e881e66b8778b8bf82 (diff) |
Fix unused variable warning
Diffstat (limited to 'Echolot')
-rw-r--r-- | Echolot/Conf.pm | 3 |
1 files changed, 2 insertions, 1 deletions
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; |