From 171d0ce861fd0dee3184dbbfb955ffcb0aa2953c Mon Sep 17 00:00:00 2001 From: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com> Date: Tue, 11 Nov 2025 13:40:20 +0400 Subject: [PATCH] view --- src/Simplex/Chat/View.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Simplex/Chat/View.hs b/src/Simplex/Chat/View.hs index 5874256876..cdbdfcf9a9 100644 --- a/src/Simplex/Chat/View.hs +++ b/src/Simplex/Chat/View.hs @@ -515,7 +515,7 @@ chatEventToView hu ChatConfig {logLevel, showReactions, showReceipts, testView} CEvtAgentUserDeleted auId -> ["completed deleting user" <> if logLevel <= CLLInfo then ", agent user id: " <> sShow auId else ""] CEvtMessageError u prefix err -> ttyUser u [plain prefix <> ": " <> plain err | prefix == "error" || logLevel <= CLLWarning] CEvtChatErrors errs -> concatMap (viewChatError False logLevel testView) errs - CEvtTimedAction _ _ -> [] + CEvtTimedAction action durationMilliseconds -> [plain action <> ", duration: " <> plain (show durationMilliseconds) <> " ms"] CEvtTerminalEvent te -> case te of TERejectingGroupJoinRequestMember _ g m reason -> [ttyFullMember m <> ": rejecting request to join group " <> ttyGroup' g <> ", reason: " <> sShow reason] TEGroupLinkRejected u g reason -> ttyUser u [ttyGroup' g <> ": join rejected, reason: " <> sShow reason]