From 003adcbf7be7f7349aad535f14397a8b8f878bca Mon Sep 17 00:00:00 2001 From: fr33domlover Date: Thu, 14 May 2020 08:58:37 +0000 Subject: [PATCH] Comment out more uses of ticket team collection --- src/Vervis/API.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/Vervis/API.hs b/src/Vervis/API.hs index 88e92f0..797e469 100644 --- a/src/Vervis/API.hs +++ b/src/Vervis/API.hs @@ -216,13 +216,13 @@ createNoteC (Entity pidUser personUser) sharerUser summary audience note = runEx case nc of NoteContextSharerTicket shr talid -> let talkhid = hashTAL talid - in [ LocalPersonCollectionSharerTicketTeam shr talkhid - , LocalPersonCollectionSharerTicketFollowers shr talkhid + in [ -- LocalPersonCollectionSharerTicketTeam shr talkhid + LocalPersonCollectionSharerTicketFollowers shr talkhid ] NoteContextProjectTicket shr prj ltid -> let ltkhid = hashLT ltid - in [ LocalPersonCollectionProjectTicketTeam shr prj ltkhid - , LocalPersonCollectionProjectTicketFollowers shr prj ltkhid + in [ -- LocalPersonCollectionProjectTicketTeam shr prj ltkhid + LocalPersonCollectionProjectTicketFollowers shr prj ltkhid ] Right _ -> [] commenter = [LocalPersonCollectionSharerFollowers shrUser]