Device protocol is almost done!

1 files changed, 1 insertions, 1 deletions

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