diff --git a/messages/uniworx/de.msg b/messages/uniworx/de.msg
index 3868a0cba..5521a602e 100644
--- a/messages/uniworx/de.msg
+++ b/messages/uniworx/de.msg
@@ -423,7 +423,7 @@ SheetTypeNotGraded: Unbewertet
SheetTypeInfoNotGraded: Blätter ohne Wertung werden nirgends angerechnet, die Bewertung durch den Korrektor dient lediglich zur Information der Teilnehmer.
SheetTypeInfoBonus: Bonus Blätter zählen normal, erhöhen aber nicht die maximal erreichbare Punktzahl bzw. Anzahl zu bestehender Blätter.
SheetGradingBonusIncluded: Erzielte Bonuspunkte wurden hier bereits zu den erreichten normalen Punkten hinzugezählt.
-SummaryTitle: Zusammenfassung über alle
+SummaryTitle: Zusammenfassung über
SheetGradingSummaryTitle intgr@Integer: #{display intgr} #{pluralDE intgr "Blatt" "Blätter"}
SubmissionGradingSummaryTitle intgr@Integer: #{display intgr} #{pluralDE intgr "Abgabe" "Abgaben"}
diff --git a/templates/widgets/gradingSummaryRow.hamlet b/templates/widgets/gradingSummaryRow.hamlet
index 0b40eeba3..16ef69f15 100644
--- a/templates/widgets/gradingSummaryRow.hamlet
+++ b/templates/widgets/gradingSummaryRow.hamlet
@@ -15,15 +15,21 @@ $#
_{sumHeader}
$maybe _ <- hasMarkedPasses
$with Sum pmax <- summary ^. _numMarkedPasses
- $with Sum pacv <- summary ^. _achievedPasses
- |
- $if pmax > 0
- #{textPercentInt pacv pmax}
- |
- #{display pacv} / #{display pmax}
+ $if pmax > 0
+ $with Sum pacv <- summary ^. _achievedPasses
+ |
+ $if pmax > 0
+ #{textPercentInt pacv pmax}
+ |
+ #{display pacv} / #{display pmax}
+ $else
+ |
+ |
$maybe _ <- hasPasses
- |
- #{display $ summary ^. _numSheetsPasses}
+ $with Sum numPass <- summary ^. _numSheetsPasses
+ |
+ $if numPass > 0
+ #{display numPass}
$maybe _ <- hasMarkedPoints
$with Sum pmax <- summary ^. _sumMarkedPoints
$with Sum pacv <- summary ^. _achievedPoints
@@ -32,9 +38,17 @@ $#
#{textPercent $ realToFrac $ pacv / pmax}
|
#{display pacv} / #{display pmax}
- \ (_{title $ getSum $ summary ^. _numMarkedPoints})
+ $if ((summary ^. _numMarkedPoints) /= (summary ^. _numSheets))
+ $# Falls Anzahl Blätter der Zeile verschieden von Anzahl gewerterer Blätter
+ \ (_{title $ getSum $ summary ^. _numMarkedPoints})
+ $# Kurze Alternative mit Hashtag-Symbol für "Anzahl"
+ $# \ (##{display $ summary ^. _numMarkedPoints})
$maybe _ <- hasPoints
|
#{display (summary ^. _sumSheetsPoints)}
- \ (_{title $ getSum $ summary ^. _numSheetsPoints})
+ $if ((summary ^. _numSheetsPoints) /= (summary ^. _numSheets))
+ $# Falls Anzahl Blätter der Zeile verschieden von Anzahl Blätter mit Punkten
+ \ (_{title $ getSum $ summary ^. _numSheetsPoints})
+ $# Kurze Alternative mit Hashtag-Symbol für "Anzahl"
+ $# \ (##{display $ summary ^. _numSheetsPoints})
| #{display $ summary ^. _numSheets}
\ No newline at end of file
|