fraport/fradrive-old
Archived
3
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Apply 2 suggestion(s) to 2 file(s)

Browse Source
This commit is contained in:
Wolfgang Witt 2021-03-16 10:07:12 +00:00 committed by Gregor Kleen
parent 26d49711d3
commit 74219c632d
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Handler/Exam/AutoOccurrence.hs
View File

@ -165,7 +165,7 @@ postEAutoOccurrenceR tid ssh csh examn = do
occMappingRule = examOccurrenceMappingRule eaofMapping occMappingRule = examOccurrenceMappingRule eaofMapping
loadProp curr max' loadProp curr max'
| Just max'' <- max', max'' /= 0 | Just max'' <- assertM (/= 0) max'
= MsgProportion (toMessage curr) (toMessage max'') (toRational curr / toRational max'') = MsgProportion (toMessage curr) (toMessage max'') (toRational curr / toRational max'')
| otherwise | otherwise
= MsgProportionNoRatio (toMessage curr) $ maybe "∞" toMessage max' = MsgProportionNoRatio (toMessage curr) $ maybe "∞" toMessage max'

2
templates/widgets/massinput/examRooms/layout.hamlet
View File

@ -18,7 +18,7 @@ $newline never
<tr> <tr>
<td> <td>
<td> <td>
<td .explanation> _{MsgExamRoomCapacityTip} <td .explanation>_{MsgExamRoomCapacityTip}
<td> <td>
<td> <td>
<td> <td>