From 2020ccc3ffbbc8a255c9e4e043167786124be2cf Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Sun, 23 Oct 2016 15:30:30 -0400 Subject: Change default for --port to 4242. --- CmdLine.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'CmdLine.hs') diff --git a/CmdLine.hs b/CmdLine.hs index 155a628..3ba4e23 100644 --- a/CmdLine.hs +++ b/CmdLine.hs @@ -181,7 +181,7 @@ parseServerConfig = ServerConfig <$> option auto ( long "port" <> metavar "P" - <> value 80 + <> value 4242 <> showDefault <> help "Port for server to listen on." ) @@ -243,4 +243,4 @@ hostPortOption = eitherReader $ \s -> (h, ':':ps) -> case reads ps of [(p, "")] -> Right (h, p) _ -> Left $ "unable to parse port \"" ++ ps ++ "\"" - (h, _) -> Right (h, 80) + (h, _) -> Right (h, 4242) -- cgit v1.2.3