Mercurial > emacs

comparison lisp/language/ethiopic.el @ 22518:64b8166a9747

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Set `exit-function' of Ethiopic lang. env. to exit-ethiopic-environment.
author Kenichi Handa <handa@m17n.org>
date Sat, 20 Jun 1998 02:59:51 +0000
parents 48d79ef65489
children 8543c4052dd2
comparison
equal deleted inserted replaced
22517:7c42ab0fcb30 22518:64b8166a9747
48 (setq font-ccl-encoder-alist 48 (setq font-ccl-encoder-alist
49 (cons (cons "ethiopic" ccl-encode-ethio-font) font-ccl-encoder-alist)) 49 (cons (cons "ethiopic" ccl-encode-ethio-font) font-ccl-encoder-alist))
50 50
51 (set-language-info-alist 51 (set-language-info-alist
52 "Ethiopic" '((setup-function . setup-ethiopic-environment) 52 "Ethiopic" '((setup-function . setup-ethiopic-environment)
53 (exit-function . exit-ethiopic-environment)
53 (charset ethiopic) 54 (charset ethiopic)
54 (coding-system iso-2022-7bit) 55 (coding-system iso-2022-7bit)
55 (coding-priority iso-2022-7bit) 56 (coding-priority iso-2022-7bit)
56 (sample-text . "$(3$O#U!.(B") 57 (sample-text . "$(3$O#U!.(B")
57 (documentation . t))) 58 (documentation . t)))