From 40684e7dcdedb38a0ff368acad3cc36facb69cd9 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Tue, 11 Jun 2002 11:06:32 +0000
Subject: Added debug some output

---
 Echolot/Scheduler.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Echolot')

diff --git a/Echolot/Scheduler.pm b/Echolot/Scheduler.pm
index 8ac4983..3c4342a 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.2 2002/06/11 10:16:38 weasel Exp $
+# $Id: Scheduler.pm,v 1.3 2002/06/11 11:06:32 weasel Exp $
 #
 
 =pod
@@ -134,6 +134,7 @@ sub run($) {
 
 			my $what = $self->{'tasks'}->{$name}->{'what'};
 			last if ($what eq 'exit');
+			print "Running $name at $now\n";
 			&$what();
 			$self->schedule($name, $now + $self->{'tasks'}->{$name}->{'interval'});
 
-- 
cgit v1.2.3