languageP :: Parser Language
languageP = option (Language . T.pack <$> str) $
      short 'l'
  <>  long "lang"
  <>  metavar "LANGUAGE"
  <>  help "The predominant language that is to be used"
languageP :: Parser Language
languageP = option (Language . T.pack <$> str) $
      short 'l'
  <>  long "lang"
  <>  metavar "LANGUAGE"
  <>  help "The predominant language that is to be used"
languageP = option (Language . T.pack <$> str) $
      short 'l'
  <>  long "lang"
  <>  metavar "LANGUAGE"
  <>  help "The predominant language that is to be used"