optionParser :: Parser TOptions
optionParser =
    TOptions
    <$> option auto
        ( long "port"   <> short 'p' <> metavar "PORT"   <> help "port to start the service" )
    <*> strOption
        ( long "config" <> short 'c' <> metavar "CONFIG" <> help "config file for twergo")
optionParser :: Parser TOptions
optionParser =
    TOptions
    <$> option auto
        ( long "port"   <> short 'p' <> metavar "PORT"   <> help "port to start the service" )
    <*> strOption
        ( long "config" <> short 'c' <> metavar "CONFIG" <> help "config file for twergo")
optionParser =
    TOptions
    <$> option auto
        ( long "port"   <> short 'p' <> metavar "PORT"   <> help "port to start the service" )
    <*> strOption
        ( long "config" <> short 'c' <> metavar "CONFIG" <> help "config file for twergo")