high level logging should be in info
Robert 'phaylon' Sedlacek [Wed, 3 Oct 2012 17:25:01 +0000 (17:25 +0000)]
bin/system-introspector-report

index 636227e..d69ad8d 100755 (executable)
@@ -35,18 +35,18 @@ my $logger = Log::Contextual::SimpleLogger->new({
 set_logger $logger;
 
 my $config = System::Introspector::Report::Config
-  ->new(config_file => log_debug { "Loading config '$_[0]'" } $config_file);
+  ->new(config_file => log_info { "Loading config '$_[0]'" } $config_file);
 
 my $source = System::Introspector::Report::Source
-  ->new_from_root(log_debug { "Loading storage '$_[0]'" } $storage_dir);
+  ->new_from_root(log_info { "Loading storage '$_[0]'" } $storage_dir);
 
 my @types = $all_reports
   ? $config->report_types
   : map [$_, {}], @report_types;
-log_debug { "Generating report data" };
+log_info { "Generating report data" };
 my @reports = $source->generate(@types);
 
-log_debug { "Publishing report data" };
+log_info { "Publishing report data" };
 for my $publisher ($config->publishers(@publish_types)) {
   try {
     $publisher->publish(\@reports);
@@ -55,7 +55,7 @@ for my $publisher ($config->publishers(@publish_types)) {
     print "Error during publish: $_\n";
   };
 }
-log_debug { "Done" };
+log_info { "Done" };
 
 __END__