Function: locale-translate

locale-translate is a byte-compiled function defined in mule-cmds.el.gz.

Signature

(locale-translate LOCALE)

Documentation

Expand LOCALE according to locale-translation-file-name, if possible.

For example, translate "swedish" into "sv_SE.ISO8859-1".

Source Code

;; Defined in /usr/src/emacs/lisp/international/mule-cmds.el.gz
(defun locale-translate (locale)
  "Expand LOCALE according to `locale-translation-file-name', if possible.
For example, translate \"swedish\" into \"sv_SE.ISO8859-1\"."
  (if locale-translation-file-name
      (with-temp-buffer
        (set-buffer-multibyte nil)
        (insert-file-contents locale-translation-file-name)
        (if (re-search-forward
             (concat "^" (regexp-quote locale) ":?[ \t]+") nil t)
            (buffer-substring (point) (line-end-position))
          locale))
    locale))