diff options
| author | Kenichi Handa | 1998-01-22 01:47:27 +0000 |
|---|---|---|
| committer | Kenichi Handa | 1998-01-22 01:47:27 +0000 |
| commit | 18d8be5d24362e8050d5a40f9c95299c4aeb51cb (patch) | |
| tree | 2ea3f304b5a74503d7f655901bf083a50deb99d0 | |
| parent | 183f11673b9e7c0ebb28a5abb33c2353539ae9c7 (diff) | |
| download | emacs-18d8be5d24362e8050d5a40f9c95299c4aeb51cb.tar.gz emacs-18d8be5d24362e8050d5a40f9c95299c4aeb51cb.zip | |
Adjusted for the change of
make-coding-system and setup-8-bit-environment.
| -rw-r--r-- | lisp/language/hebrew.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/language/hebrew.el b/lisp/language/hebrew.el index 71fd2115f62..26c61bbe2ee 100644 --- a/lisp/language/hebrew.el +++ b/lisp/language/hebrew.el | |||
| @@ -33,7 +33,8 @@ | |||
| 33 | "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)" | 33 | "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)" |
| 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 | '(ascii hebrew-iso8859-8)) | 36 | '((safe-charsets ascii hebrew-iso8859-8) |
| 37 | (mime-charset . iso-8859-8))) | ||
| 37 | 38 | ||
| 38 | (define-coding-system-alias 'iso-8859-8 'hebrew-iso-8bit) | 39 | (define-coding-system-alias 'iso-8859-8 'hebrew-iso-8bit) |
| 39 | 40 | ||
| @@ -41,8 +42,7 @@ | |||
| 41 | "Setup multilingual environment (MULE) for Hebrew. | 42 | "Setup multilingual environment (MULE) for Hebrew. |
| 42 | But, please note that right-to-left writing is not yet supported." | 43 | But, please note that right-to-left writing is not yet supported." |
| 43 | (interactive) | 44 | (interactive) |
| 44 | (setup-8-bit-environment "Hebrew" 'hebrew-iso8859-8 'hebrew-iso-8bit | 45 | (setup-8-bit-environment "Hebrew" 'hebrew-iso8859-8 "hebrew")) |
| 45 | "hebrew")) | ||
| 46 | 46 | ||
| 47 | (set-language-info-alist | 47 | (set-language-info-alist |
| 48 | "Hebrew" '((setup-function . setup-hebrew-environment) | 48 | "Hebrew" '((setup-function . setup-hebrew-environment) |