diff --git a/src/Handler/Exam/AutoOccurrence.hs b/src/Handler/Exam/AutoOccurrence.hs
index 28e5e0d4f..9b8bff23b 100644
--- a/src/Handler/Exam/AutoOccurrence.hs
+++ b/src/Handler/Exam/AutoOccurrence.hs
@@ -168,7 +168,7 @@ postEAutoOccurrenceR tid ssh csh examn = do
                 | Just max'' <- max', max'' /= 0
                 = MsgProportion (toMessage curr) (toMessage max'') (toRational curr / toRational max'')
                 | otherwise
-                = MsgProportionNoRatio (toMessage curr) $ maybe "-" toMessage max'
+                = MsgProportionNoRatio (toMessage curr) $ maybe "∞" toMessage max'
 
               occMapping occId = examOccurrenceMappingDescriptionWidget occMappingRule <$> Map.lookup occId (examOccurrenceMappingMapping eaofMapping)
            in $(widgetFile "widgets/exam-occurrence-mapping")