Minor bugfix: QueueNotfication for UserRightsUpdate

src/Jobs/Handler/QueueNotification.hs

@@ -4,7 +4,7 @@ module Jobs.Handler.QueueNotification
 
 import Import hiding ((\\))
 
-import Data.List ((\\))
+import Data.List (nub, (\\))
 
 import Jobs.Types
 
@@ -67,7 +67,7 @@ determineNotificationCandidates NotificationUserRightsUpdate{..}
         E.on $ admin E.^. UserAdminUser E.==. user E.^. UserId
         E.where_ $ admin E.^. UserAdminSchool `E.in_` E.valList newAdminSchools
         return user
-      return $ affectedUser <> affectedAdmins
+      return $ nub $ affectedUser <> affectedAdmins
 
 
 classifyNotification :: Notification -> DB NotificationTrigger