-- | Parse locale.  Raises 'CSLLocaleException' on error.
parseLocale :: Text -> IO Locale
parseLocale locale =
  parseLocaleElement . fromDocument . X.parseLBS_ X.def <$> getLocale locale
parseLocale :: Text -> IO Locale
parseLocale locale =
  parseLocaleElement . fromDocument . X.parseLBS_ X.def <$> getLocale locale
parseLocale locale =
  parseLocaleElement . fromDocument . X.parseLBS_ X.def <$> getLocale locale