From 8bcaaf5524504f01bd5643d74848cec625370aa9 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Roman=20Smr=C5=BE?= Date: Mon, 28 Jul 2025 16:48:15 +0200 Subject: Peer address input in ServiceHandler --- src/Erebos/Service.hs | 1 + 1 file changed, 1 insertion(+) (limited to 'src/Erebos/Service.hs') diff --git a/src/Erebos/Service.hs b/src/Erebos/Service.hs index 4499ef9..afcf512 100644 --- a/src/Erebos/Service.hs +++ b/src/Erebos/Service.hs @@ -115,6 +115,7 @@ mkServiceID = maybe (error "Invalid service ID") ServiceID . U.fromString data ServiceInput s = ServiceInput { svcAttributes :: ServiceAttributes s , svcPeer :: Peer + , svcPeerAddress :: PeerAddress , svcPeerIdentity :: UnifiedIdentity , svcServer :: Server , svcPrintOp :: String -> IO () -- cgit v1.2.3