Changeset 8030 for lang/perl/App-MadEye

Timestamp:

03/17/08 15:38:46 (9 months ago)

Author:

tokuhirom

Message:

どの監視対象も問題なければ Notify する必要はない。

Files:

• lang/perl/App-MadEye/trunk/lib/App/MadEye.pm (modified) (2 diffs)

lang/perl/App-MadEye/trunk/lib/App/MadEye.pm

@@ -16 +16 @@
     $self->log(debug => 'run');
 
+    $self->{results} = {};
+
     $context = $self;
 
@@ -31 +33 @@
     $self->run_hook('after_run_jobs');
 
-    $self->run_hook('notify' => $self->{results});
+    if (%{$self->{results}}) {
+        $self->run_hook('notify' => $self->{results});
+    }
 
     $self->log(debug => 'finished');