chore: use ∞ to display unrestricted room size

This commit is contained in:
Wolfgang Witt 2021-03-10 15:57:54 +01:00 committed by Gregor Kleen
parent 03a0899f5f
commit d34f674c3e

View File

@ -168,7 +168,7 @@ postEAutoOccurrenceR tid ssh csh examn = do
| Just max'' <- max', max'' /= 0 | Just max'' <- max', max'' /= 0
= 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'
occMapping occId = examOccurrenceMappingDescriptionWidget occMappingRule <$> Map.lookup occId (examOccurrenceMappingMapping eaofMapping) occMapping occId = examOccurrenceMappingDescriptionWidget occMappingRule <$> Map.lookup occId (examOccurrenceMappingMapping eaofMapping)
in $(widgetFile "widgets/exam-occurrence-mapping") in $(widgetFile "widgets/exam-occurrence-mapping")