1;;; hebrew.el --- support for Hebrew -*- coding: iso-2022-7bit; no-byte-compile: t -*- 2 3;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007 4;; Free Software Foundation, Inc. 5;; Copyright (C) 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 6;; 2005, 2006, 2007 7;; National Institute of Advanced Industrial Science and Technology (AIST) 8;; Registration Number H14PRO021 9 10;; Keywords: multilingual, Hebrew 11 12;; This file is part of GNU Emacs. 13 14;; GNU Emacs is free software; you can redistribute it and/or modify 15;; it under the terms of the GNU General Public License as published by 16;; the Free Software Foundation; either version 2, or (at your option) 17;; any later version. 18 19;; GNU Emacs is distributed in the hope that it will be useful, 20;; but WITHOUT ANY WARRANTY; without even the implied warranty of 21;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 22;; GNU General Public License for more details. 23 24;; You should have received a copy of the GNU General Public License 25;; along with GNU Emacs; see the file COPYING. If not, write to the 26;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, 27;; Boston, MA 02110-1301, USA. 28 29;;; Commentary: 30 31;; For Hebrew, the character set ISO8859-8 is supported. 32;; See http://www.ecma.ch/ecma1/STAND/ECMA-121.HTM. 33;; Windows-1255 is also supported. 34 35;;; Code: 36 37(make-coding-system 38 'hebrew-iso-8bit 2 ?8 39 "ISO 2022 based 8-bit encoding for Hebrew (MIME:ISO-8859-8)." 40 '(ascii hebrew-iso8859-8 nil nil 41 nil nil nil nil nil nil nil nil t nil nil t) 42 '((safe-charsets ascii hebrew-iso8859-8) 43 (mime-charset . iso-8859-8))) 44 45(define-coding-system-alias 'iso-8859-8 'hebrew-iso-8bit) 46 47;; These are for Explicit and Implicit directionality information, as 48;; defined in RFC 1556. We don't yet support directional information 49;; in bidi languages, so these aliases are a lie, especially as far as 50;; iso-8859-8-e is concerned. FIXME. 51(define-coding-system-alias 'iso-8859-8-e 'hebrew-iso-8bit) 52(define-coding-system-alias 'iso-8859-8-i 'hebrew-iso-8bit) 53 54(set-language-info-alist 55 "Hebrew" '((charset . (hebrew-iso8859-8)) 56 (coding-priority hebrew-iso-8bit) 57 (coding-system . (hebrew-iso-8bit)) 58 (nonascii-translation . hebrew-iso8859-8) 59 (input-method . "hebrew") 60 (unibyte-display . hebrew-iso-8bit) 61 (sample-text . "Hebrew ,Hylem(B") 62 (documentation . "Right-to-left writing is not yet supported."))) 63 64(set-language-info-alist 65 "Windows-1255" '((coding-priority windows-1255) 66 (coding-system windows-1255) 67 (features code-pages) 68 (documentation . "\ 69Support for Windows-1255 encoding, e.g. for Yiddish. 70Right-to-left writing is not yet supported."))) 71 72(provide 'hebrew) 73 74;;; arch-tag: 3ca04f32-3f1e-498e-af46-8267498ba5d9 75;;; hebrew.el ends here 76