repoSlugP :: T.Text -> Parser RepoSlug
repoSlugP htext = option (RepoSlug . T.pack <$> str) $
      short 'r'
  <>  long "repository"
  <>  help (T.unpack htext)
repoSlugP :: T.Text -> Parser RepoSlug
repoSlugP htext = option (RepoSlug . T.pack <$> str) $
      short 'r'
  <>  long "repository"
  <>  help (T.unpack htext)
repoSlugP htext = option (RepoSlug . T.pack <$> str) $
      short 'r'
  <>  long "repository"
  <>  help (T.unpack htext)