1981 |
;; http://www.din.de/gremien/nas/nabd/iso3166ma/codlstp1/en_listp1.html. |
;; http://www.din.de/gremien/nas/nabd/iso3166ma/codlstp1/en_listp1.html. |
1982 |
;; CODESET and MODIFIER are implementation-dependent. |
;; CODESET and MODIFIER are implementation-dependent. |
1983 |
|
|
1984 |
|
;; jasonr comments: MS Windows uses three letter codes for |
1985 |
|
;; languages instead of the two letter ISO codes that POSIX |
1986 |
|
;; uses. In most cases the first two letters are the same, so |
1987 |
|
;; most of the regexps in locale-language-names work. Japanese |
1988 |
|
;; and Chinese are exceptions, which are listed in the |
1989 |
|
;; non-standard section at the bottom of locale-language-names. |
1990 |
|
|
1991 |
; aa Afar |
; aa Afar |
1992 |
; ab Abkhazian |
; ab Abkhazian |
1993 |
("af" . "Latin-1") ; Afrikaans |
("af" . "Latin-1") ; Afrikaans |
2242 |
(if (locale-charset-match-p charset (caar cs)) |
(if (locale-charset-match-p charset (caar cs)) |
2243 |
(setq c (intern (caar cs))) |
(setq c (intern (caar cs))) |
2244 |
(pop cs))) |
(pop cs))) |
2245 |
(coding-system-base c)))) |
(if c (coding-system-base c))))) |
2246 |
|
|
2247 |
;; Fixme: This ought to deal with the territory part of the locale |
;; Fixme: This ought to deal with the territory part of the locale |
2248 |
;; too, for setting things such as calendar holidays, ps-print paper |
;; too, for setting things such as calendar holidays, ps-print paper |