diff options
Diffstat (limited to 'lisp/language/hebrew.el')
-rw-r--r-- | lisp/language/hebrew.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/lisp/language/hebrew.el b/lisp/language/hebrew.el index c9aa5678411..7970b5a82e4 100644 --- a/lisp/language/hebrew.el +++ b/lisp/language/hebrew.el @@ -29,10 +29,13 @@ ;;; Code: (make-coding-system - 'iso-8859-8 2 ?8 "MIME ISO-8859-8" + 'hebrew-iso-8bit 2 ?8 + "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)" '((ascii t) (hebrew-iso8859-8 t) nil nil nil ascii-eol ascii-cntl nil nil nil nil nil t)) +(define-coding-system-alias 'hebrew-iso-8bit 'iso-8859-8) + (register-input-method "Hebrew" '("quail-hebrew" quail-use-package "quail/hebrew")) @@ -40,16 +43,16 @@ "Setup multilingual environment (MULE) for Hebrew. But, please note that right-to-left writing is not yet supported." (interactive) - (setup-8-bit-environment 'hebrew-iso8859-8 'iso-8859-8 + (setup-8-bit-environment 'hebrew-iso8859-8 'hebrew-iso-8bit '("Hebrew" . "quail-hebrew"))) (set-language-info-alist "Hebrew" '((setup-function . setup-hebrew-environment) (describe-function . describe-hebrew-support) (charset . (hebrew-iso8859-8)) - (coding-system . (iso-8859-8)) + (coding-system . (hebrew-iso-8bit)) (sample-text . "Hebrew ,Hylem(B") (documentation . "Right-to-left writing is not yet supported.") )) -;;; hebew.el ends here +;;; hebrew.el ends here |