fix(hlint): remove superfluous dollar
This commit is contained in:
parent
17df5fd5cf
commit
7c1df8a261
@ -547,7 +547,7 @@ postEUsersR tid ssh csh examn = do
|
|||||||
E.&&. tut E.^. TutorialName `E.hasInfix` E.val (CI.mk criterion)
|
E.&&. tut E.^. TutorialName `E.hasInfix` E.val (CI.mk criterion)
|
||||||
]
|
]
|
||||||
|
|
||||||
dbtFilterUI mPrev = mconcat $
|
dbtFilterUI mPrev = mconcat
|
||||||
[ fltrUserNameEmailUI mPrev
|
[ fltrUserNameEmailUI mPrev
|
||||||
, fltrUserMatriclenrUI mPrev
|
, fltrUserMatriclenrUI mPrev
|
||||||
, prismAForm (singletonFilter "occurrence") mPrev $ aopt (selectField' (Just $ SomeMessage MsgExamNoFilter) $ optionsF [CI.original examOccurrenceName | Entity _ ExamOccurrence{..} <- occurrences]) (fslI MsgTableExamOccurrence)
|
, prismAForm (singletonFilter "occurrence") mPrev $ aopt (selectField' (Just $ SomeMessage MsgExamNoFilter) $ optionsF [CI.original examOccurrenceName | Entity _ ExamOccurrence{..} <- occurrences]) (fslI MsgTableExamOccurrence)
|
||||||
|
|||||||
Reference in New Issue
Block a user