Mercurial > emacs
diff lisp/language/european.el @ 42051:7b6dcc19e895
("Welsh", "Latin-7", "Lithuanian")
("Latvian"): New languages.
author | Dave Love <fx@gnu.org> |
---|---|
date | Sat, 15 Dec 2001 17:43:05 +0000 |
parents | 8fb314e3c7fd |
children | e3ae5ef41293 |
line wrap: on
line diff
--- a/lisp/language/european.el Sat Dec 15 17:42:33 2001 +0000 +++ b/lisp/language/european.el Sat Dec 15 17:43:05 2001 +0000 @@ -360,6 +360,36 @@ (documentation . t)) '("European")) +(set-language-info-alist + "Welsh" `((coding-system utf-8 latin-8) ; the input method is Unicode-based + (coding-priority utf-8 latin-8) + (input-method . "welsh") + (documentation . "Support for Welsh, using Unicode.")) + '("European")) + +(set-language-info-alist + "Latin-7" `((coding-system latin-7) + (coding-priority latin-7) + ;; Fixme: input-method + (features code-pages) + (documentation . "Support for Latin-7, e.g. Latvian, Lithuanian.")) + '("European")) + +(set-language-info-alist + "Lithuanian" `((coding-system latin-7) + (coding-priority latin-7) + (input-method . "lithuanian-keyboard") + (features code-pages) + (documentation . "Support for Lithuanian.")) + '("European")) + +(set-language-info-alist + "Latvian" `((coding-system latin-7) + (coding-priority latin-7) + (input-method . "latvian-keyboard") + (features code-pages) + (documentation . "Support for Latvian.")) + '("European")) ;; Definitions for the Mac Roman character sets and coding system. ;; The Mac Roman encoding uses all 128 code points in the range 128 to