core: add group forwarding tests (#6067)

This commit is contained in:
spaced4ndy
2025-07-14 10:52:38 +00:00
committed by GitHub
parent ca672bbc77
commit ed6ef02eeb
2 changed files with 107 additions and 4 deletions
-1
View File
@@ -3161,7 +3161,6 @@ processChatCommand vr nm = \case
Nothing -> do
setGroupLinkData'
let recipients = filter memberCurrentOrPending ms
liftIO $ putStrLn $ "about to sendGroupMessage to " <> show (length recipients)
sendGroupMessage user g' Nothing recipients (XGrpInfo p')
where
setGroupLinkData' :: CM ()