publicKeyPathP :: Parser T.Text
publicKeyPathP = option (T.pack <$> str) $
      long "public-key"
  <>  metavar "PATH"
  <>  help "Path to the public SSH key"
publicKeyPathP :: Parser T.Text
publicKeyPathP = option (T.pack <$> str) $
      long "public-key"
  <>  metavar "PATH"
  <>  help "Path to the public SSH key"
publicKeyPathP = option (T.pack <$> str) $
      long "public-key"
  <>  metavar "PATH"
  <>  help "Path to the public SSH key"