diff options
| author | Peter Palfrader <peter@palfrader.org> | 2002-07-22 01:28:21 +0000 |
|---|---|---|
| committer | Peter Palfrader <peter@palfrader.org> | 2002-07-22 01:28:21 +0000 |
| commit | a21e00e8907f6c21399ef797f9490c9402c56c7f (patch) | |
| tree | 28f5cdcb07ad8a7899d8f422feec7b9dacb32a86 /Echolot/Scheduler.pm | |
| parent | 145357f56d46773e8cea0013fc5e08205a897ff2 (diff) | |
Not the current time but the scheduled start time is used when deciding which remailers to ping
Diffstat (limited to 'Echolot/Scheduler.pm')
| -rw-r--r-- | Echolot/Scheduler.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Echolot/Scheduler.pm b/Echolot/Scheduler.pm index c122769..df245c8 100644 --- a/Echolot/Scheduler.pm +++ b/Echolot/Scheduler.pm @@ -1,7 +1,7 @@ package Echolot::Scheduler; # (c) 2002 Peter Palfrader <peter@palfrader.org> -# $Id: Scheduler.pm,v 1.10 2002/07/17 17:53:44 weasel Exp $ +# $Id: Scheduler.pm,v 1.11 2002/07/22 01:28:21 weasel Exp $ # =pod @@ -145,7 +145,7 @@ sub run($) { my $what = $self->{'tasks'}->{$name}->{'what'}; print "Running $name at ".(time())." (scheduled for $now)\n" if Echolot::Config::get()->{'verbose'}; last if ($what eq 'exit'); - &$what( @{ $task->{'arguments'} } ); + &$what( $now, @{ $task->{'arguments'} } ); $self->schedule($name, $now + $self->{'tasks'}->{$name}->{'interval'}) if ($self->{'tasks'}->{$name}->{'interval'} > 0); |