Mercurial > emacs
comparison lisp/language/hebrew.el @ 18309:bd8b521f5218
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 | 0745f30aec66 |
children | 8b4a66c66dd6 |
comparison
equal
deleted
inserted
replaced
18308:b8622afb8a6e | 18309:bd8b521f5218 |
---|---|
34 '((ascii t) (hebrew-iso8859-8 t) nil nil | 34 '((ascii t) (hebrew-iso8859-8 t) nil nil |
35 nil ascii-eol ascii-cntl nil nil nil nil nil t)) | 35 nil ascii-eol ascii-cntl nil nil nil nil nil t)) |
36 | 36 |
37 (define-coding-system-alias 'hebrew-iso-8bit 'iso-8859-8) | 37 (define-coding-system-alias 'hebrew-iso-8bit 'iso-8859-8) |
38 | 38 |
39 (register-input-method | |
40 "Hebrew" '("quail-hebrew" quail-use-package "quail/hebrew")) | |
41 | |
42 (defun setup-hebrew-environment () | 39 (defun setup-hebrew-environment () |
43 "Setup multilingual environment (MULE) for Hebrew. | 40 "Setup multilingual environment (MULE) for Hebrew. |
44 But, please note that right-to-left writing is not yet supported." | 41 But, please note that right-to-left writing is not yet supported." |
45 (interactive) | 42 (interactive) |
46 (setup-8-bit-environment 'hebrew-iso8859-8 'hebrew-iso-8bit | 43 (setup-8-bit-environment 'hebrew-iso8859-8 'hebrew-iso-8bit |