X-Git-Url: http://git.ieval.ro/?p=gruntmaster-daemon.git;a=blobdiff_plain;f=lib%2FGruntmaster%2FDaemon.pm;fp=lib%2FGruntmaster%2FDaemon.pm;h=ef3aea61a758222da80b195914079246e8e02920;hp=2af9b5306a78229d334deaa819bd2b0fd30ece26;hb=b64ba7e2b3b74ff6ee886e1ee3c85f7468758daf;hpb=34cc90c9aa31c1cad1fcef0684e940407426ad1d diff --git a/lib/Gruntmaster/Daemon.pm b/lib/Gruntmaster/Daemon.pm index 2af9b53..ef3aea6 100644 --- a/lib/Gruntmaster/Daemon.pm +++ b/lib/Gruntmaster/Daemon.pm @@ -7,7 +7,7 @@ use warnings; our $VERSION = '5999.000_005'; use Gruntmaster::Daemon::Constants qw/ERR/; -use Gruntmaster::Daemon::Format qw/prepare_files stopvms/; +use Gruntmaster::Daemon::Format qw/prepare_files copy_from_vm stopvms/; use File::Slurp qw/read_file/; use File::Temp qw/tempdir/; @@ -85,6 +85,7 @@ sub process{ unlink 'time-start-prog', 'time-stop-prog'; if (ref $result) { my $result_text = $result->[1]; + copy_from_vm 'result'; $result_text .= ': ' . read_file 'result' if -s 'result'; get_logger->trace("Test $test result is " . $result_text); push @full_results, {id => $test, result => $result->[0], result_text => $result_text, time => $time}