diff --git a/src/Handler/Utils/Communication.hs b/src/Handler/Utils/Communication.hs index 0bc8e3f38..5d2365721 100644 --- a/src/Handler/Utils/Communication.hs +++ b/src/Handler/Utils/Communication.hs @@ -27,6 +27,7 @@ import qualified Data.Set as Set import qualified Data.Conduit.Combinators as C +{-# ANN module ("HLint: ignore Functor law" :: String) #-} data RecipientGroup = RGCourseParticipants | RGCourseLecturers | RGCourseCorrectors | RGCourseTutors | RGCourseParticipantsInTutorial | RGCourseUnacceptedApplicants -- WARNING: no RenderMessage instance, but a pattern match in templates/widgets/communication/recipientLayout.hamlet that needs to be extended