log what group/host we are storing

diff --git a/lib/System/Introspector/State.pm b/lib/System/Introspector/State.pm
index 678bc42..8141d80 100644 (file)
--- a/lib/System/Introspector/State.pm
+++ b/lib/System/Introspector/State.pm
@@ -87,6 +87,7 @@ sub storage {
 
 sub _store {
     my ($self, $host, $group, $gathered) = @_;
+    $self->_log("Storing data for group '$group' on '$host'");
     my $storage = $self->storage($host, $group);
     my $ok = eval {
         my @files;