diff --git a/src/Simplex/Chat/Library/Subscriber.hs b/src/Simplex/Chat/Library/Subscriber.hs
index 40ab0fb3c3..33467941b7 100644
--- a/src/Simplex/Chat/Library/Subscriber.hs
+++ b/src/Simplex/Chat/Library/Subscriber.hs
@@ -3316,7 +3316,7 @@ runDeliveryJobWorker a deliveryKey Worker {doWork} = do
                         sendLoop bucketSize cursorGMId_ = do
                           mems <- withStore' $ \db -> getGroupMembersByCursor db vr user gInfo cursorGMId_ singleSenderGMId_ bucketSize
                           unless (null mems) $ do
-                            deliver body mems
+                            timeItToView ("deliver, " <> show (length mems) <> " mems") $ deliver body mems
                             let cursorGMId' = groupMemberId' $ last mems
                             withStore' $ \db -> updateDeliveryJobCursor db jobId cursorGMId'
                             unless (length mems < bucketSize) $ sendLoop bucketSize (Just cursorGMId')