dandri/simplex-chat
1
0 Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2026-11-04 12:57:45 +00:00
Code Issues Packages Projects Releases Wiki Activity

core: fix test build with simplexmq 7.1.0.16 (#7998)

Browse Source
This commit is contained in:
Evgeny @ SimpleX Chat authored and GitHub committed 2026-11-02 18:25:47 +00:00
1 parent 06f220a8b7
commit 2d2913b39f
1 file changed
+1 -1
Download Patch File Download Diff File Expand all files Collapse all files
tests/NameResolver.hs
+1 -1
View File
@@ -47,7 +47,7 @@ withNameResolver action = do
_ -> pure (notFound404, "{}")
send $ responseLBS st [(hContentType, "application/json")] body
nameResponse (Just nameRecord) = NameResponse {lastBlockTs = Nothing, registration = NRRegistered {expires = Nothing, graceUntil = Nothing, reservedReason_ = Nothing, nameRecord}}
nameResponse Nothing = NameResponse {lastBlockTs = Nothing, registration = NRAvailable {pricing = NamePricing {registrationPrices = M.empty, basePrice = USDCents 1000, minLabelLength = 1}}}
nameResponse Nothing = NameResponse {lastBlockTs = Nothing, registration = NRAvailable {pricing = NamePricing {registrationPrices = M.empty, basePrice = USDCents 1000, minLabelLength = 1}, nameTerms = Nothing}}
-- | Register a name's domain to resolve to the given record.
registerName :: TVar (Map Text NameRecord) -> SimplexNameInfo -> NameRecord -> IO ()