improved title and last-run reporting

1 files changed, 12 insertions, 0 deletions

diff --git a/rhautoimport.pm b/rhautoimport.pm
index 7c0fd50..0f9f197 100644
--- a/rhautoimport.pm
+++ b/rhautoimport.pm
@@ -45,6 +45,18 @@ use constant {
   CBA_API_KEY => '/etc/cba-api.key'
 };
 
+sub report_title_and_last
+{
+  my ($title, $last_run) = @_;
+
+  $title = "" unless $title;
+  $last_run = 0 unless $last_run;
+
+  if (open my $handle, '>&=3') {
+    print $handle $title . "\n";
+    print $handle $last_run . "\n";
+  }
+}
 
 sub get_dropboxes
 {