From f8424270a7ab499f9263b52fa150522c90cc9c1f Mon Sep 17 00:00:00 2001
From: "Evgeny @ SimpleX Chat"
 <259188159+evgeny-simplex@users.noreply.github.com>
Date: Mon, 27 Jul 2026 10:55:55 +0000
Subject: [PATCH] better query

---
 src/Simplex/Chat/Store/Groups.hs | 13 +++++++++++--
 1 file changed, 11 insertions(+), 2 deletions(-)

diff --git a/src/Simplex/Chat/Store/Groups.hs b/src/Simplex/Chat/Store/Groups.hs
index 3020777253..1b3662f470 100644
--- a/src/Simplex/Chat/Store/Groups.hs
+++ b/src/Simplex/Chat/Store/Groups.hs
@@ -1709,8 +1709,17 @@ setMemberPubKey db groupMemberId pubKey = do
 setMembersMemberKeySent :: DB.Connection -> [GroupMemberId] -> IO ()
 setMembersMemberKeySent db memberIds = do
   currentTs <- getCurrentTime
-  forM_ memberIds $ \memberId ->
-    DB.execute db "UPDATE group_members SET user_member_key_sent = ?, updated_at = ? WHERE group_member_id = ?" (BI True, currentTs, memberId)
+#if defined(dbPostgres)
+  DB.execute
+    db
+    "UPDATE group_members SET user_member_key_sent = ?, updated_at = ? WHERE group_member_id IN ?"
+    (BI True, currentTs, In memberIds)
+#else
+  DB.executeMany
+    db
+    "UPDATE group_members SET user_member_key_sent = ?, updated_at = ? WHERE group_member_id = ?"
+    [(BI True, currentTs, memberId) | memberId <- memberIds]
+#endif
 
 setGroupMemberVerified :: DB.Connection -> User -> GroupMemberId -> Maybe Text -> IO ()
 setGroupMemberVerified db User {userId} groupMemberId code = do