Fix Room hosting

 - Use the correct RPC handler for when the 'host-room' command is used.
 - Avoid making clients hang up by returning OK when the rpc endpoint
   call is unknown.

1 files changed, 1 insertions, 1 deletions

diff --git a/app/Main.hs b/app/Main.hs
index 47d86c7..a9a05f9 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -109,7 +109,7 @@ hostRoomCMD name desc hostname = do
         Room.Invite { host = hostname, port = "8008", key = publicKey me }
   putStrLn $ "Hosting room for '" <> Room.formatInvite roomInvite <> "'"
 
-  router <- defaultHandler
+  router <- Room.newRoom name desc
   TCP.serveRPC router hostname (Room.port roomInvite) mainNet me
 
 parser :: Options.Parser Command