diff --git a/src/Simplex/Messaging/Server/Names.hs b/src/Simplex/Messaging/Server/Names.hs
index a1e099202..bccc07020 100644
--- a/src/Simplex/Messaging/Server/Names.hs
+++ b/src/Simplex/Messaging/Server/Names.hs
@@ -80,7 +80,7 @@ mapReason = \case
   "internal" -> NRInternal
   "premium" -> NRPremium
   -- a code this router has no word for: still reserved, just unworded
-  _ -> NRUnknown
+  t -> NRUnknown t
 
 fetch :: NamesEnv -> SimplexDomain -> IO (Either NameErrorType NameResponse)
 fetch NamesEnv {resolverEnv} d =