core, ui: make msgVerified optional (#7247)

This commit is contained in:
spaced4ndy authored and GitHub committed 2026-07-13 21:20:36 +00:00
1 parent d7af648d2a
commit e53508ecca
18 files changed
+50 -68

No files matched your search

+4 -4
View File
@@ -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 ""