diff options
author | Peter Palfrader <peter@palfrader.org> | 2003-02-14 05:12:50 +0000 |
---|---|---|
committer | Peter Palfrader <peter@palfrader.org> | 2003-02-14 05:12:50 +0000 |
commit | d18c8194f5076f742a0ee74fc1c68c43efb5000a (patch) | |
tree | 58d622fdc1abf57497d12bb4fd0dab023d9f16cb /Echolot/Mailin.pm | |
parent | 5c1ce6deba7439b6a4f019e1f8a56994fe7db2e8 (diff) |
Handle chainpings off to chainpinger
Diffstat (limited to 'Echolot/Mailin.pm')
-rw-r--r-- | Echolot/Mailin.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Echolot/Mailin.pm b/Echolot/Mailin.pm index 27785f7..2d0d196 100644 --- a/Echolot/Mailin.pm +++ b/Echolot/Mailin.pm @@ -1,7 +1,7 @@ package Echolot::Mailin; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Mailin.pm,v 1.11 2003/02/03 20:10:05 weasel Exp $ +# $Id: Mailin.pm,v 1.12 2003/02/14 05:12:50 weasel Exp $ # =pod @@ -82,6 +82,7 @@ sub handle($) { Echolot::Conf::remailer_adminkey($body, $type, $timestamp), return 1 if ($type =~ /^adminkey\./); Echolot::Pinger::receive($body, $type, $timestamp), return 1 if ($type eq 'ping'); + Echolot::Chain($body, $type, $timestamp), return 1 if ($type eq 'chainping'); Echolot::Log::warn("Didn't know what to do with '$to'."), return 0; |