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

chore: don't use suffix of a prefix for mapping description

Browse Source
This commit is contained in:
Wolfgang Witt 2021-02-08 16:37:53 +01:00 committed by Wolfgang Witt
parent 8f2b31acef
commit 344bd420cd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -304,7 +304,7 @@ examAutoOccurrence (hash -> seed) rule ExamAutoOccurrenceConfig{..} occurrences
| (uid, (User{..}, Nothing)) <- Map.toList users | (uid, (User{..}, Nothing)) <- Map.toList users
, matriculation' <- userMatrikelnummer ^.. _Just . filtered (not . null) , matriculation' <- userMatrikelnummer ^.. _Just . filtered (not . null)
] ]
in Map.mapKeysWith Set.union (take . F.minimum . Set.map length $ Map.keysSet matrUsers) matrUsers in matrUsers
_ -> Map.singleton [] $ Map.keysSet users _ -> Map.singleton [] $ Map.keysSet users
occurrences' :: Map ExamOccurrenceId Natural occurrences' :: Map ExamOccurrenceId Natural