From 21aa1d1f11c369323d8c3bf71648bd0a8321ca61 Mon Sep 17 00:00:00 2001 From: Aleksey Veresov Date: Mon, 12 Apr 2021 01:01:22 +0300 Subject: Device protocol is almost done! --- Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Main.hs') diff --git a/Main.hs b/Main.hs index ca9c155..9f7af19 100644 --- a/Main.hs +++ b/Main.hs @@ -9,7 +9,7 @@ inet_socket :: String -> Parser ConfigSocket inet_socket sock = ConfigInet <$> strOption ( long ("i" ++ sock) <> metavar ("ADDR_" ++ sock) - <> help ("Address for internet socket " ++ sock) ) + <> help ("Port for internet socket " ++ sock) ) unix_socket :: String -> Parser ConfigSocket unix_socket sock = ConfigUnix <$> strOption -- cgit v1.2.3