X-Git-Url: http://git.ieval.ro/?p=gruntmaster-daemon.git;a=blobdiff_plain;f=lib%2FGruntmaster%2FDaemon%2FFormat.pm;h=2b60139327f827366b965b48a4854dc29021518a;hp=a3b8a65fedd6af3fab66f889b79b3acccdefd9ca;hb=36ecc8ea1322839782fce6d8d765f3fe7ab4f575;hpb=16724726149793a6a78336cc7c46e751c363df10 diff --git a/lib/Gruntmaster/Daemon/Format.pm b/lib/Gruntmaster/Daemon/Format.pm index a3b8a65..2b60139 100644 --- a/lib/Gruntmaster/Daemon/Format.pm +++ b/lib/Gruntmaster/Daemon/Format.pm @@ -82,7 +82,7 @@ sub mkrun{ while (my ($fd, $file) = $it->()) { push @args, "--fd=$fd $file"; } - execlist $basename, @args, "./$basename" + execlist $basename, @args, '--', "./$basename", @{$args{args}} } } @@ -93,10 +93,11 @@ sub prepare{ try { execlist prog => '--fd=1 >>errors', '--fd=2 >>errors', 'gruntmaster-compile', $format, $name; } catch { - die "Compile error\n" + my $exmsg = $_->[1]; + die "Compile error ($exmsg)\n" } finally { $Gruntmaster::Daemon::errors .= read_file 'errors'; - $Gruntmaster::Daemon::errors .= "\n"; + $Gruntmaster::Daemon::errors .= "\n" if -s 'errors'; unlink 'errors'; }; }