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