mirror of
https://github.com/simplex-chat/simplex-chat.git
synced 2026-07-13 02:59:02 +00:00
core: add domain to channel /i output
This commit is contained in:
@@ -1833,15 +1833,18 @@ viewContactInfo ct@Contact {contactId, profile = LocalProfile {localAlias, conta
|
||||
<> viewCustomData customData
|
||||
|
||||
viewGroupInfo :: GroupInfo -> [StyledString]
|
||||
viewGroupInfo gInfo@GroupInfo {groupId, businessChat, groupDomainVerified, uiThemes, customData, groupSummary = GroupSummary {currentMembers, publicMemberCount}} =
|
||||
viewGroupInfo gInfo@GroupInfo {groupId, businessChat, groupDomainVerified, groupProfile = GroupProfile {publicGroup}, uiThemes, customData, groupSummary = GroupSummary {currentMembers, publicMemberCount}} =
|
||||
[ "group ID: " <> sShow groupId,
|
||||
memberCountLine
|
||||
]
|
||||
-- a business presents as a contact, so its verified domain is shown as an @-name
|
||||
<> simplexDomainLine NTContact (businessDomain =<< businessChat) groupDomainVerified
|
||||
<> domainLine
|
||||
<> viewUITheme uiThemes
|
||||
<> viewCustomData customData
|
||||
where
|
||||
-- a business presents as a contact (@-name); a public group/channel shows its #-name
|
||||
domainLine = case businessChat of
|
||||
Just bc -> simplexDomainLine NTContact (businessDomain bc) groupDomainVerified
|
||||
Nothing -> simplexDomainLine NTPublicGroup (publicGroup >>= publicGroupAccess >>= groupDomainClaim) groupDomainVerified
|
||||
memberCountLine
|
||||
| useRelays' gInfo, Just count <- publicMemberCount = "subscribers: " <> sShow count
|
||||
| otherwise = "current members: " <> sShow currentMembers
|
||||
|
||||
Reference in New Issue
Block a user