Finish SELinux policy ad fix some bugs

[gruntmaster-daemon.git] / lib / Gruntmaster / Daemon.pm

diff --git a/lib/Gruntmaster/Daemon.pm b/lib/Gruntmaster/Daemon.pm
index f0e66f25c4d7e569ee665278168b6879880abd64..bc2518e8a6d4961c62c496ddc66c2ca772975175 100644 (file)
--- a/lib/Gruntmaster/Daemon.pm
+++ b/lib/Gruntmaster/Daemon.pm
@@ -122,7 +122,7 @@ sub process{
   $meta->{results} = \@full_results if scalar @full_results;
   DumpFile "meta.yml", $meta;
   for (<*>) {
-       unlink $_ unless $_ eq 'in' || $_ eq 'meta.yml';
+       unlink $_ unless $_ eq 'in' || $_ eq 'meta.yml' || ($_ eq 'compile-error' && -s);
   }
   chdir '../..';
   mkdir 'log' unless -d 'log';
@@ -131,7 +131,7 @@ sub process{
   my $logmeta = LoadFile 'log/meta.yml';
   $logmeta->{last}++;
   rename $dir, 'log/' . $logmeta->{last};
-  generate 'log/' . $logmeta->{last} . '/index.htm';
+  generate 'log/' . $logmeta->{last} . '/index.html';
   DumpFile 'log/meta.yml', $logmeta;
   undef $logmetafh;
   generate 'log/index.html'