Mercurial > emacs

comparison lisp/language/ethiopic.el @ 18309:bd8b521f5218

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Provide XXX-util instead of language/XXX-util. Delete local variable declartion. Delete the code of calling register-input-method form all files under this directory.
author Kenichi Handa <handa@m17n.org>
date Wed, 18 Jun 1997 13:06:17 +0000
parents 73869115ae0a
children 8b4a66c66dd6
comparison
equal deleted inserted replaced
18308:b8622afb8a6e 18309:bd8b521f5218
46 "CCL program to encode an Ehitopic code to code point of Ehitopic font.") 46 "CCL program to encode an Ehitopic code to code point of Ehitopic font.")
47 47
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 (register-input-method
52 "Ethiopic" '("quail-ethio" quail-use-package "quail/ethiopic"))
53
54 (set-language-info-alist 51 (set-language-info-alist
55 "Ethiopic" '((setup-function . setup-ethiopic-environment) 52 "Ethiopic" '((setup-function . setup-ethiopic-environment)
56 (charset . (ethiopic)) 53 (charset . (ethiopic))
57 (sample-text . "$(3$O#U!.(B") 54 (sample-text . "$(3$O#U!.(B")
58 (documentation . t))) 55 (documentation . t)))