diff --git a/src/Vervis/Ticket.hs b/src/Vervis/Ticket.hs index 4828362..2a43cc2 100644 --- a/src/Vervis/Ticket.hs +++ b/src/Vervis/Ticket.hs @@ -64,7 +64,7 @@ getTicketSummaries mfilt morder jid = do on $ p ^. PersonIdent ==. s ^. SharerId on $ t ^. TicketCreator ==. p ^. PersonId where_ $ t ^. TicketProject ==. val jid - groupBy $ d ^. DiscussionId + groupBy $ t ^. TicketId for_ mfilt $ \ filt -> where_ $ filt t for_ morder $ \ order -> orderBy $ order t return