mirror of
https://github.com/simplex-chat/simplex-chat.git
synced 2026-10-22 21:52:28 +00:00
core, ui: make msgVerified optional (#7247)
This commit is contained in:
1 parent
d7af648d2a
commit
e53508ecca
18 files changed
+50
-68
No files matched your search
@@ -395,11 +395,11 @@ sigStatusStr = \case
|
||||
Just MSSSignedNoKey -> " (signed, no key to verify)"
|
||||
Nothing -> ""
|
||||
|
||||
msgVerifiedStr :: IsString a => MsgVerified -> a
|
||||
msgVerifiedStr :: IsString a => Maybe MsgVerified -> a
|
||||
msgVerifiedStr = \case
|
||||
MVSigned s -> sigStatusStr (Just s)
|
||||
MVSigMissing -> " (signature missing)"
|
||||
MVUnsigned -> ""
|
||||
Just (MVSigned s) -> sigStatusStr (Just s)
|
||||
Just MVSigMissing -> " (signature missing)"
|
||||
Nothing -> ""
|
||||
|
||||
signedStr :: IsString a => Bool -> a
|
||||
signedStr signed = if signed then " (signed)" else ""
|
||||
|
||||
Reference in new issue
Block a user