| blob | 2eadd8f8eb5507957d91ffa49dbf545a93bc2b6a |
1 ;;; latin1-disp.el --- display tables for other ISO 8859 on Latin-1 terminals -*-coding: utf-8;-*-
3 ;; Copyright (C) 2000-2013 Free Software Foundation, Inc.
5 ;; Author: Dave Love <fx@gnu.org>
6 ;; Keywords: i18n
8 ;; This file is part of GNU Emacs.
10 ;; GNU Emacs is free software: you can redistribute it and/or modify
11 ;; it under the terms of the GNU General Public License as published by
12 ;; the Free Software Foundation, either version 3 of the License, or
13 ;; (at your option) any later version.
15 ;; GNU Emacs is distributed in the hope that it will be useful,
16 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
17 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 ;; GNU General Public License for more details.
20 ;; You should have received a copy of the GNU General Public License
21 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
23 ;;; Commentary:
25 ;; This package sets up display of ISO 8859-n for n>1 by substituting
26 ;; Latin-1 characters and sequences of them for characters which can't
27 ;; be displayed, either because we're on a tty or because we don't
28 ;; have the relevant window system fonts available. For instance,
29 ;; Latin-9 is very similar to Latin-1, so we can display most Latin-9
30 ;; characters using the Latin-1 characters at the same code point and
31 ;; fall back on more-or-less mnemonic ASCII sequences for the rest.
33 ;; For the Latin charsets the ASCII sequences are mostly consistent
34 ;; with the Quail prefix input sequences. Latin-4 uses the Quail
35 ;; postfix sequences since a prefix method isn't defined for Latin-4.
37 ;; [A different approach is taken in the DOS display tables in
38 ;; term/internal.el, and the relevant ASCII sequences from there are
39 ;; available as an alternative; see `latin1-display-mnemonic'. Only
40 ;; these sequences are used for Arabic, Cyrillic, Greek and Hebrew.]
42 ;; If you don't even have Latin-1, see iso-ascii.el and use the
43 ;; complete tables from internal.el. The ASCII sequences used here
44 ;; are mostly in the same style as iso-ascii.
46 ;;; Code:
48 ;; Ensure `standard-display-table' is set up:
52 latin-9 arabic cyrillic greek hebrew)
53 "The ISO8859 character sets with defined Latin-1 display sequences.
54 These are the nicknames for the sets and correspond to Emacs language
58 "Set up display tables for ISO8859 characters using Latin-1."
64 "A format string used to display the ASCII sequences.
65 The default encloses the sequence in braces, but you could just use
67 `latin1-display-face'."
71 ;;;###autoload
73 "Set up Latin-1/ASCII display for ISO8859 character sets.
74 This is done for each character set in the list `latin1-display-sets',
75 if no font is available to display it. Characters are displayed using
76 the corresponding Latin-1 characters where they match. Otherwise
77 ASCII sequences are used, mostly following the Latin prefix input
78 methods. Some different ASCII sequences are used if
79 `latin1-display-mnemonic' is non-nil.
81 This option also treats some characters in the `mule-unicode-...'
82 charsets if you don't have a Unicode font with which to display them.
84 Setting this variable directly does not take effect;
95 ;;;###autoload
97 "Set up Latin-1/ASCII display for the arguments character SETS.
98 See option `latin1-display' for the method. The members of the list
99 must be in `latin1-display-sets'. With no arguments, reset the
100 display for all of `latin1-display-sets'. See also
101 `latin1-display-setup'."
106 ;; Extra stuff for windows-1252, in particular.
122 )))
131 "Non-nil means to display potentially more mnemonic sequences.
132 These are taken from the tables in `internal.el' rather than the Quail
133 input sequences."
138 "Face to use for displaying substituted ASCII sequences."
144 "Make an entry in `standard-display-table' for CHAR using string DISPLAY.
145 If ALT-DISPLAY is provided, use that instead if
146 `latin1-display-mnemonic' is non-nil. The actual string displayed is
147 formatted using `latin1-display-format'.
149 DISPLAY and ALT-DISPLAY are either strings or vectors. String values
150 are formatted using `latin1-display-format' and passed to
151 `standard-display-ascii'; vectors are put into `standard-display-table'
152 asis."
154 latin1-display-mnemonic)
161 display))))
166 "Display each character in CHARSET as the corresponding Latin-1 character.
167 CHARSET is a symbol which is the nickname of a language environment
168 using an ISO8859 character set."
180 "Set up the default display for each character of LANGUAGE's charset.
181 LANGUAGE is a symbol naming a language environment using an ISO8859
182 character set."
186 'arabic-iso8859-6
191 charset))
195 "Return non-nil if we have a font with an encoding for LANGUAGE.
196 LANGUAGE is a symbol naming a language environment using an ISO8859
197 character set: `latin-2', `hebrew' etc."
204 ;; Backwards compatibility.
209 "Set up Latin-1 display for characters in the given SET.
210 SET must be a member of `latin1-display-sets'. Normally, check
211 whether a font for SET is available and don't set the display if it
212 is. If FORCE is non-nil, set up the display regardless."
280 )))
526 ;; Don't start with identities, since we don't have definitions
527 ;; for a lot of Hebrew in internal.el. (Intlfonts is also
528 ;; missing some glyphs.)
569 ;; Arabic probably isn't so useful in the absence of Arabic
570 ;; language support...
741 ;;;###autoload
743 "Set up Latin-1/ASCII display for Unicode characters.
744 This uses the transliterations of the Lynx browser. The display isn't
745 changed if the display can render Unicode characters.
747 Setting this variable directly does not take effect;
759 "Set up Latin-1/ASCII display for Unicode characters.
760 This uses the transliterations of the Lynx browser.
762 With argument ARG, turn such display on if ARG is positive, otherwise
763 turn it off and display Unicode characters literally. The display
764 isn't changed if the display can render Unicode characters."
768 ;; It doesn't look as though we have a Unicode font.
773 ;; Table derived by running Lynx on a suitable list of
774 ;; characters in a utf-8 file, except for some added by
775 ;; hand at the end.
3184 ;; Not from Lynx
3198 ;;; latin1-disp.el ends here