diff --git a/src/Vervis/Handler/Ticket.hs b/src/Vervis/Handler/Ticket.hs index db5ac40..9b7f757 100644 --- a/src/Vervis/Handler/Ticket.hs +++ b/src/Vervis/Handler/Ticket.hs @@ -783,7 +783,10 @@ postTicketDiscussionR shr prj num = do postTopReply hLocal [ProjectR shr prj] - [TicketParticipantsR shr prj num, TicketTeamR shr prj num] + [ ProjectFollowersR shr prj + , TicketParticipantsR shr prj num + , TicketTeamR shr prj num + ] (TicketR shr prj num) (TicketDiscussionR shr prj num) (const $ TicketR shr prj num) @@ -801,7 +804,10 @@ postTicketMessageR shr prj num mkhid = do postReply hLocal [ProjectR shr prj] - [TicketParticipantsR shr prj num, TicketTeamR shr prj num] + [ ProjectFollowersR shr prj + , TicketParticipantsR shr prj num + , TicketTeamR shr prj num + ] (TicketR shr prj num) (TicketReplyR shr prj num . encodeHid) (TicketMessageR shr prj num . encodeHid)