about summary refs log tree commit diff
path: root/lib/jitterbug/Builder.pm
diff options
context:
space:
mode:
authorJonathan "Duke" Leto <jonathan@leto.net>2011-01-05 11:31:52 -0800
committerJonathan "Duke" Leto <jonathan@leto.net>2011-01-05 11:31:52 -0800
commitec5ccbeb50a04a2bc6ac9bb2b5dcfe6293b841a4 (patch)
tree907afaa8ca639b6965ba7eb8517eb506e63d767c /lib/jitterbug/Builder.pm
parentPrint more useful info when it is needed (diff)
downloadjitterbug-ec5ccbeb50a04a2bc6ac9bb2b5dcfe6293b841a4.tar.gz
Create a sleep method in jitterbug::Builder and fix a typo
Diffstat (limited to '')
-rw-r--r--lib/jitterbug/Builder.pm13
1 files changed, 10 insertions, 3 deletions
diff --git a/lib/jitterbug/Builder.pm b/lib/jitterbug/Builder.pm
index a235b6b..457b159 100644
--- a/lib/jitterbug/Builder.pm
+++ b/lib/jitterbug/Builder.pm
@@ -48,17 +48,24 @@ sub build {
 
     while (1) {
         foreach my $task (@tasks) {
-            $task ? $self->run_task($task) : sleep $self->{'interval'};
+            $task ? $self->run_task($task) : $self->sleep;
         }
 
         $self->{'cron'} and return 0;
 
-        sleep 5;
+        $self->sleep(5);
     }
 
     return 1;
 }
 
+sub sleep {
+    my ($self, $interval) = @_;
+    $interval ||= $self->{'interval'};
+    warn "sleeping for $interval seconds\n";
+    sleep $interval;
+}
+
 sub run_task {
     my $self   = shift;
     my ($task) = @_;
@@ -117,7 +124,7 @@ sub run_task {
     $task->commit->update( {
         content => JSON::encode_json($desc),
     } );
-    warn "Task completed for " . $task->commitsha256 . "\n";
+    warn "Task completed for " . $task->commit->sha256 . "\n";
 
     $task->delete();