Use parttyMain

diff --git a/DeafAndSilent.hs b/DeafAndSilent.hs
index de876f6..edd5acc 100644 (file)
--- a/DeafAndSilent.hs
+++ b/DeafAndSilent.hs
@@ -32,5 +32,4 @@ ncb (GotScore score) = liftIO $ putStrLn $ "Got score: " ++ show score
 
 ncb e = return ()
 
-main = runPartty "localhost" 1111 "me2" "passwd" dcb ncb Nothing
-
+main = parttyMain dcb ncb Nothing