From 0031801a743d70c8391caa862ad0f4da9a4190cc Mon Sep 17 00:00:00 2001
From: fr33domlover <fr33domlover@riseup.net>
Date: Thu, 7 Nov 2019 10:45:44 +0000
Subject: [PATCH] Fix SQL error when selecting ticket summaries

---
 src/Vervis/Ticket.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Vervis/Ticket.hs b/src/Vervis/Ticket.hs
index 204ab2c..e04011c 100644
--- a/src/Vervis/Ticket.hs
+++ b/src/Vervis/Ticket.hs
@@ -64,7 +64,7 @@ getTicketSummaries mfilt morder jid = fmap (map toSummary) $ select $ from $
         where_ $ t  ^. TicketProject ==. val jid
         groupBy
             ( t ^. TicketId, s ?. SharerId
-            , ra ?. RemoteActorId, i ?. InstanceId
+            , ra ?. RemoteActorId, ro ?. RemoteObjectId, i ?. InstanceId
             )
         for_ mfilt $ \ filt -> where_ $ filt t
         for_ morder $ \ order -> orderBy $ order t