Add compile errors

diff --git a/lib/Gruntmaster/Data.pm b/lib/Gruntmaster/Data.pm
index bf5d2e1a808e9e1067544df673b95fad2a143de9..1ca79586a24580b06ed494727230176a4c91f91e 100644 (file)
--- a/lib/Gruntmaster/Data.pm
+++ b/lib/Gruntmaster/Data.pm
@@ -76,7 +76,7 @@ sub defhash{
 
 defhash problem => qw/name level statement owner author/;
 defhash contest => qw/start end name owner/;
-defhash job => qw/date extension filesize private problem result result_text user/;
+defhash job => qw/date errors extension filesize private problem result result_text user/;
 defhash user => qw/name email town university level/;
 
 sub clean_job (_){

diff --git a/lib/Gruntmaster/Page/Log/Entry.pm b/lib/Gruntmaster/Page/Log/Entry.pm
index a8abc12d250504802ab57a8ca1d3f988118b17d3..2c4aa3acb5cfc1bec533ddf6e673a08e5c80e642 100644 (file)
--- a/lib/Gruntmaster/Page/Log/Entry.pm
+++ b/lib/Gruntmaster/Page/Log/Entry.pm
@@ -9,6 +9,10 @@ our $VERSION = '0.001';
 
 use constant TEMPLATES => {
        en => <<'HTML',
+Compiler output:
+<pre><tmpl_var errors></pre>
+
+Results:
 <table border>
 <thead>
 <tr><th>Test number<th>Result<th>Time
@@ -37,6 +41,7 @@ sub _generate{
 
        $htc->param(id => $id);
        $htc->param(tests => \@tests);
+       $htc->param(errors => job_errors $id)
 }
 
 1