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 |