From f3048621ff03a499a33b341c3a492b657537c789 Mon Sep 17 00:00:00 2001
From: Paul Buetow <paul@buetow.org>
Date: Mon, 23 May 2011 06:43:34 +0000
Subject: fixed lastrun hash access

---
 lib/PerlDaemon/RunModules.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/PerlDaemon')

diff --git a/lib/PerlDaemon/RunModules.pm b/lib/PerlDaemon/RunModules.pm
index 485ca60..0b814f0 100644
--- a/lib/PerlDaemon/RunModules.pm
+++ b/lib/PerlDaemon/RunModules.pm
@@ -49,7 +49,7 @@ sub do ($) {
                 while (my ($k, $v) = each %$modules) {
                         $logger->logmsg("Triggering $k");
                         $v->do();
-                        $scheduler->{$k} = gettimeofday;
+                        $scheduler->{$k}{lastrun} = gettimeofday;
                 }
         }
 }
-- 
cgit v1.2.3