From: Robert 'phaylon' Sedlacek <r.sedlacek@shadowcat.co.uk>
Date: Wed, 3 Oct 2012 17:25:26 +0000 (+0000)
Subject: log loaded data files and nodes
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=ca66351c55b12222f9139947f1f6daccb156941c;p=scpubgit%2FSystem-Introspector-Report.git

log loaded data files and nodes
---

diff --git a/lib/System/Introspector/Report/Source.pm b/lib/System/Introspector/Report/Source.pm
index e71d075..5371ea7 100644
--- a/lib/System/Introspector/Report/Source.pm
+++ b/lib/System/Introspector/Report/Source.pm
@@ -3,6 +3,7 @@ use Moo;
 use JSON::PP;
 use IO::All;
 use Module::Runtime qw( use_module );
+use Log::Contextual qw( :log );
 
 my $_json = JSON::PP->new->utf8->relaxed->allow_nonref;
 
@@ -29,6 +30,7 @@ sub generate {
     my ($id, $path) = @$dir_spec;
     my $data = $self->_load_dataset($path, $required)
       or next;
+    log_debug { "loading node '$id' from '$path'" };
     $_->collect_from($id, $data)
       for @generators;
   }