integrate avahi publish & discovery

1 files changed, 2 insertions, 2 deletions

diff --git a/avahi.hs b/avahi.hs
index 2db3be71..aeb8138f 100644
--- a/avahi.hs
+++ b/avahi.hs
@@ -9,6 +9,6 @@ exampleNodeId = read $ replicate 43 'a'
 main :: IO ()
 main = do
   [hostname, port, nodeId] <- getArgs
-  void $ announceToxService hostname (fromMaybe 54321 $ readMaybe port) (fromMaybe exampleNodeId $ readMaybe nodeId)
-  void $ queryToxService print
+  void $ forkIO $ announceToxServiceWithHostname hostname (fromMaybe 54321 $ readMaybe port) (fromMaybe exampleNodeId $ readMaybe nodeId)
+  void $ forkIO $ queryToxService print
   void $ getLine