From 749cd2f7bcf990f5eee18d90099843151cb56716 Mon Sep 17 00:00:00 2001
From: Steffen Jost <jost@tcs.ifi.lmu.de>
Date: Wed, 26 Jun 2019 15:22:46 +0200
Subject: [PATCH] fix(sheet corrector assigment): minor bugfix

---
 templates/corrections-overview.hamlet | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/templates/corrections-overview.hamlet b/templates/corrections-overview.hamlet
index c4d4c0f3c..94ada0543 100644
--- a/templates/corrections-overview.hamlet
+++ b/templates/corrections-overview.hamlet
@@ -104,15 +104,17 @@
     $if 0 < length sheetNames
       <tr .table__row>
         <td .table__th>Σ
-        <td .table__th>#{ciSubmissions corrMapSum}
+        $with ciSubmissionsNr <- ciSubmissions corrMapSum
+          $with ciCorrectedNr <- ciCorrected   corrMapSum
+            <td .table__th>#{ciSubmissionsNr}
+            <td .table__td .heated style="--hotness: #{heat ciSubmissionsNr ciCorrectedNr}">#{ciSubmissionsNr - ciCorrectedNr}
         <td .table__th>#{ciCorrected   corrMapSum}
-        <td .table__th>
         <td .table__th>#{showDiffDays (ciMin corrMapSum)}
         <td .table__th>#{showAvgsDays (ciTot corrMapSum) (ciCorrected corrMapSum)}
         <td .table__th>#{showDiffDays (ciMax corrMapSum)}
         $forall shn <- sheetNames
           <td .table__th>#{getLoadSum shn}
-          <td .table__th colspan=4>^{simpleLinkI (SomeMessage MsgMenuCorrectorsChange) (CSheetR tid ssh csh shn SCorrR)}
+          <td .table__td colspan=4>^{simpleLinkI (SomeMessage MsgMenuCorrectorsChange) (CSheetR tid ssh csh shn SCorrR)}
   ^{btnWdgt}
  <div>
   <p>_{MsgAssignSubmissionsRandomWarning}
\ No newline at end of file