diff options
| author | Peter Palfrader <peter@palfrader.org> | 2002-06-11 10:08:19 +0000 |
|---|---|---|
| committer | Peter Palfrader <peter@palfrader.org> | 2002-06-11 10:08:19 +0000 |
| commit | 320340f881112fc6834e54a99951afb0803ad9c4 (patch) | |
| tree | 66a0083dc81df832e71d7ce15e3d1a0af5ae181a | |
| parent | 307157938d05a1537efea49cf7093da516e6882c (diff) | |
Moved ping* values to config file
| -rw-r--r-- | Echolot/Pinger.pm | 7 | ||||
| -rw-r--r-- | pingd.conf | 3 |
2 files changed, 7 insertions, 3 deletions
diff --git a/Echolot/Pinger.pm b/Echolot/Pinger.pm index 0585ef8..cebfe05 100644 --- a/Echolot/Pinger.pm +++ b/Echolot/Pinger.pm @@ -1,7 +1,7 @@ package Echolot::Pinger; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Pinger.pm,v 1.1 2002/06/11 09:53:35 weasel Exp $ +# $Id: Pinger.pm,v 1.2 2002/06/11 10:08:19 weasel Exp $ # =pod @@ -69,8 +69,9 @@ sub do_ping($$$) { return 1; }; -sub send_pings($$) { - my ($call_intervall, $send_every_n_calls) = @_; +sub send_pings() { + my $call_intervall = Echolot::Config::get()->{'pinger_interval'} + my $send_every_n_calls = Echolot::Config::get()->{'ping_every_nth_time'} my $now = time(); @@ -20,6 +20,9 @@ <item key="mailerrordir">mail/ERROR</item> <item key="ping_new">1</item> <item key="show_new">0</item> + <item key="pinger_interval">60</hash> + <item key="ping_every_nth_time">2</hash> + </item> <item key="Pinger::Mix"> <hash> <item key="mixdir">/home/weasel/Mix</item> |