From 75afcb66591dea408b87d42d5a03d44e372d17fe Mon Sep 17 00:00:00 2001
From: Sergey Ivanov <seriv@cs.umd.edu>
Date: Thu, 2 Apr 2020 14:56:00 -0400
Subject: [PATCH] Adding service "now" to Resmon Core::Resmon

---
 lib/Resmon/Status.pm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/lib/Resmon/Status.pm b/lib/Resmon/Status.pm
index e99b8ad..5a3e8a2 100644
--- a/lib/Resmon/Status.pm
+++ b/lib/Resmon/Status.pm
@@ -182,6 +182,14 @@ sub dump_generic_module {
         my $info = $services->{$service};
         $rv .= $dumper->($module,$service,$info);
     }
+    if ($module eq "Core::Resmon") {
+      my $info = {
+        name => 'now',
+	type => 'i',
+	value => time(),
+      };
+      $rv .= $dumper->($module,"now",$info);
+    }
     return $rv;
 }
 sub dump_xml {
-- 
GitLab