This repository has been archived on 2024-10-24. You can view files and clone it, but cannot push or open issues or pull requests.
fradrive-old/templates/correction-user.hamlet

60 lines
2.1 KiB
Plaintext

$newline never
$# SPDX-FileCopyrightText: 2022 Gregor Kleen <gregor.kleen@ifi.lmu.de>,Sarah Vaupel <vaupel.sarah@campus.lmu.de>,Steffen Jost <jost@tcs.ifi.lmu.de>,Winnie Ros <winnie.ros@campus.lmu.de>
$#
$# SPDX-License-Identifier: AGPL-3.0-or-later
<div .scrolltable>
<table .table .table--striped .table--vertical>
<tr .table__row>
<th .table__th>_{MsgTableSubmission}
<td .table__td>#{cid}
$maybe Entity _ usr <- corrector
<tr .table__row>
<th .table__th>_{MsgRatingBy}
<td .table__td>^{userEmailWidget usr}
$maybe time <- submissionRatingTime
<tr .table__row>
<th .table__th>_{MsgTableRatingTime}
<td .table__td>^{formatTimeW SelFormatDateTime time}
$maybe points <- submissionRatingPoints
$maybe grading <- preview _grading sheetType
$case grading
$of Points{..}
<tr .table__row>
<th .table__th>^{sheetTypeDesc tr}
<td .table__td>_{MsgTableAchievedOf points maxPoints}
$of PassPoints{..}
<tr .table__row>
<th .table__th>^{sheetTypeDesc tr}
<td .table__td>
$if fromMaybe False (gradingPassed grading points)
_{MsgTablePassed}
$else
_{MsgTableNotPassed}
<tr .table__row>
<th .table__th>_{MsgAchievedPassPoints}
<td .table__td>_{MsgPassAchievedOf points passingPoints maxPoints}
$of PassBinary
<tr .table__row>
<th .table__th>^{sheetTypeDesc tr}
<td .table__td>
$if fromMaybe False (gradingPassed grading points)
_{MsgTablePassed}
$else
_{MsgTableNotPassed}
$of PassAlways
$if filesCorrected
<tr .table__row>
<th .table__th>_{MsgRatingFiles}
<td .table__td>
<a href=#{urlArchive}>
_{MsgRatingUpdatedFiles}
$maybe comment <- ratingComment
<tr .table__row>
<th .table__th>_{MsgRatingComment}
<td .table__td .comment>#{comment}