summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Echolot/Scheduler.pm4
-rw-r--r--Echolot/Storage/File.pm4
2 files changed, 2 insertions, 6 deletions
diff --git a/Echolot/Scheduler.pm b/Echolot/Scheduler.pm
index 711b9e0..1d5735c 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.5 2002/06/20 04:28:13 weasel Exp $
+# $Id: Scheduler.pm,v 1.6 2002/07/02 13:51:30 weasel Exp $
#
=pod
@@ -123,7 +123,6 @@ sub run($) {
if ($task->{'start'} < $now) {
warn("Task $task->{'name'} could not be started on time\n");
} else {
- print "zZzZZzz at $now\n";
sleep ($task->{'start'} - $now);
};
@@ -138,7 +137,6 @@ sub run($) {
warn("Task $task->{'name'} is not defined\n");
my $what = $self->{'tasks'}->{$name}->{'what'};
- print "Running $name at ".(time())." (scheduled for $now)\n";
last if ($what eq 'exit');
&$what();
$self->schedule($name, $now + $self->{'tasks'}->{$name}->{'interval'}) if
diff --git a/Echolot/Storage/File.pm b/Echolot/Storage/File.pm
index f036b6e..cf0fdf4 100644
--- a/Echolot/Storage/File.pm
+++ b/Echolot/Storage/File.pm
@@ -1,7 +1,7 @@
package Echolot::Storage::File;
# (c) 2002 Peter Palfrader <peter@palfrader.org>
-# $Id: File.pm,v 1.12 2002/07/02 13:40:13 weasel Exp $
+# $Id: File.pm,v 1.13 2002/07/02 13:51:00 weasel Exp $
#
=pod
@@ -383,7 +383,6 @@ sub register_pingout($$$$) {
cluck("Error when writing to $remailer_addr; type=$type; key=$key; out pings: $!"),
return 0;
$fh->flush();
-print "registering pingout at $sent_time for $remailer_addr ($type; $key)\n";
return 1;
};
@@ -428,7 +427,6 @@ sub register_pingdone($$$$$) {
cluck("Error when writing to outgoing pings file for remailer $remailer_addr; key=$key file: $!"),
return 0;
$fh->flush();
-print "registering pingdone from $sent_time with latency $latency for $remailer_addr ($type; $key)\n";
return 1;
};