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 /Echolot/Pinger.pm | |
| parent | 307157938d05a1537efea49cf7093da516e6882c (diff) | |
Moved ping* values to config file
Diffstat (limited to 'Echolot/Pinger.pm')
| -rw-r--r-- | Echolot/Pinger.pm | 7 |
1 files changed, 4 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(); |