From aa6c19ebda0b57031b8b2247b5688f353da66e61 Mon Sep 17 00:00:00 2001 From: Wolfgang Walther Date: Sat, 11 Jul 2026 23:30:02 +0200 Subject: [PATCH] test: remove useless doctest in Network.hs This essentially just tests upstream's show instance. --- src/PostgREST/Network.hs | 18 +----------------- 1 file changed, 1 insertion(+), 17 deletions(-) diff --git a/src/PostgREST/Network.hs b/src/PostgREST/Network.hs index 3b0fd0f3d..1ac0e4afb 100644 --- a/src/PostgREST/Network.hs +++ b/src/PostgREST/Network.hs @@ -20,23 +20,7 @@ import Protolude resolveSocketToAddress :: NS.Socket -> IO Text resolveSocketToAddress sock = do sn <- NS.getSocketName sock - return $ showSocketAddr sn - --- | --- >>> let addr_ipv4 = NS.SockAddrInet 80 (NS.tupleToHostAddress (127,0,0,1)) --- >>> let addr_ipv6 = NS.SockAddrInet6 80 0 (0,0,0,1) 0 --- >>> let addr_unix = NS.SockAddrUnix "/tmp/pgrst.sock" --- --- >>> showSocketAddr addr_ipv4 --- "127.0.0.1:80" - --- >>> showSocketAddr addr_ipv6 --- "[::1]:80" --- --- >>> showSocketAddr addr_unix --- "/tmp/pgrst.sock" -showSocketAddr :: NS.SockAddr -> Text -showSocketAddr = fromString . show + return $ fromString $ show sn -- | When printing special addresses like !4 or *6, we use the following mapping. -- These special addresses come from: