From 4c8dc9f7d86b2572be29e6a603e4d8d65415177f Mon Sep 17 00:00:00 2001 From: Alain Brenzikofer Date: Wed, 23 Sep 2026 08:54:35 +0200 Subject: [PATCH] cut some comments --- src/Simplex/Messaging/Names/Record.hs | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/src/Simplex/Messaging/Names/Record.hs b/src/Simplex/Messaging/Names/Record.hs index c483f233f..60e5500a7 100644 --- a/src/Simplex/Messaging/Names/Record.hs +++ b/src/Simplex/Messaging/Names/Record.hs @@ -92,11 +92,7 @@ data NameRegistration NRReserved {reservedReason :: NameReservedReason} deriving (Eq, Show) --- | What the registry holds for an address: the names it owns, and whether the --- account is in use, which holding a name is only one way to be. `ownInUse` is --- what the resolver could see on its own chain - the nonce, the balance and --- every name the address holds, not only the ones listed here - so an account --- used only for other tokens, or on another chain, reads as unused. +-- | What the registry holds for an address: the names it owns, and whether the account is in use data OwnedNames = OwnedNames { ownNames :: [OwnedName], ownInUse :: Bool, @@ -105,8 +101,7 @@ data OwnedNames = OwnedNames } deriving (Eq, Show) --- | One name an address holds. Enumeration is not maintained on expiry, so a --- lapsed name stays listed; `onStatus` is how a caller tells it apart. +-- | One name an address holds. A lapsed name stays listed; `onStatus` is how a caller tells it apart. data OwnedName = OwnedName { -- | absent when the registrar never recorded the label onName :: Maybe Text,