Mercurial > emacs
annotate lisp/term/x-win.el @ 68522:081be1a1c981
*** empty log message ***
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Wed, 01 Feb 2006 10:41:27 +0000 |
parents | eb72b7c5a0b9 |
children | 067115a6e738 693e794b57bf 7beb78bc1f8e |
rev | line source |
---|---|
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1 ;;; x-win.el --- parse relevant switches and set up for X -*-coding: iso-2022-7bit;-*- |
14170
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
2 |
64701
34bd8e434dd7
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
3 ;; Copyright (C) 1993, 1994, 2001, 2002, 2003, 2004, |
34bd8e434dd7
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
4 ;; 2005 Free Software Foundation, Inc. |
2157
0d77768bf3f2
Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2145
diff
changeset
|
5 |
0d77768bf3f2
Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2145
diff
changeset
|
6 ;; Author: FSF |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
7 ;; Keywords: terminals, i18n |
2157
0d77768bf3f2
Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2145
diff
changeset
|
8 |
14170
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
9 ;; This file is part of GNU Emacs. |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
10 |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
11 ;; GNU Emacs is free software; you can redistribute it and/or modify |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
12 ;; it under the terms of the GNU General Public License as published by |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
13 ;; the Free Software Foundation; either version 2, or (at your option) |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
14 ;; any later version. |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
15 |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
16 ;; GNU Emacs is distributed in the hope that it will be useful, |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
19 ;; GNU General Public License for more details. |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
20 |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
21 ;; You should have received a copy of the GNU General Public License |
23cc3f54e536
Update FSF's office address.
Erik Naggum <erik@naggum.no>
parents:
14122
diff
changeset
|
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the |
64084 | 23 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
24 ;; Boston, MA 02110-1301, USA. | |
54 | 25 |
2157
0d77768bf3f2
Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2145
diff
changeset
|
26 ;;; Commentary: |
54 | 27 |
28 ;; X-win.el: this file is loaded from ../lisp/startup.el when it recognizes | |
29 ;; that X windows are to be used. Command line switches are parsed and those | |
30 ;; pertaining to X are processed and removed from the command line. The | |
31 ;; X display is opened and hooks are set for popping up the initial window. | |
32 | |
33 ;; startup.el will then examine startup files, and eventually call the hooks | |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
34 ;; which create the first window(s). |
2157
0d77768bf3f2
Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2145
diff
changeset
|
35 |
0d77768bf3f2
Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2145
diff
changeset
|
36 ;;; Code: |
54 | 37 |
38 ;; These are the standard X switches from the Xt Initialize.c file of | |
39 ;; Release 4. | |
40 | |
41 ;; Command line Resource Manager string | |
42 | |
43 ;; +rv *reverseVideo | |
44 ;; +synchronous *synchronous | |
45 ;; -background *background | |
46 ;; -bd *borderColor | |
47 ;; -bg *background | |
48 ;; -bordercolor *borderColor | |
49 ;; -borderwidth .borderWidth | |
50 ;; -bw .borderWidth | |
51 ;; -display .display | |
52 ;; -fg *foreground | |
53 ;; -fn *font | |
54 ;; -font *font | |
55 ;; -foreground *foreground | |
56 ;; -geometry .geometry | |
57 ;; -iconic .iconic | |
58 ;; -name .name | |
59 ;; -reverse *reverseVideo | |
60 ;; -rv *reverseVideo | |
61 ;; -selectionTimeout .selectionTimeout | |
62 ;; -synchronous *synchronous | |
63 ;; -xrm | |
64 | |
65 ;; An alist of X options and the function which handles them. See | |
66 ;; ../startup.el. | |
67 | |
273 | 68 (if (not (eq window-system 'x)) |
4132
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
69 (error "%s: Loading x-win.el but not compiled for X" (invocation-name))) |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
70 |
779 | 71 (require 'frame) |
467 | 72 (require 'mouse) |
1972
b0cde2f5164d
* term/x-win.el: Require `scroll-bar', not `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1954
diff
changeset
|
73 (require 'scroll-bar) |
2718
c91b18333f58
* x-win.el: Since we require faces.el, there's no point in setting
Jim Blandy <jimb@redhat.com>
parents:
2586
diff
changeset
|
74 (require 'faces) |
c91b18333f58
* x-win.el: Since we require faces.el, there's no point in setting
Jim Blandy <jimb@redhat.com>
parents:
2586
diff
changeset
|
75 (require 'select) |
2808 | 76 (require 'menu-bar) |
49288
7f09b406bc3c
Require fontset unconditionally again.
Kenichi Handa <handa@m17n.org>
parents:
49185
diff
changeset
|
77 (require 'fontset) |
53789
7efe8089eadf
* x-dnd.el: New file for drag and drop.
Jan Djärv <jan.h.d@swipnet.se>
parents:
53745
diff
changeset
|
78 (require 'x-dnd) |
273 | 79 |
3373
4177a984e5c0
(x-invocation-args): Add defvar.
Richard M. Stallman <rms@gnu.org>
parents:
3287
diff
changeset
|
80 (defvar x-invocation-args) |
65259
ba3854e2c98c
(x-keysym-table, x-selection-timeout, x-session-id, x-session-previous-id):
Juanma Barranquero <lekktu@gmail.com>
parents:
64701
diff
changeset
|
81 (defvar x-keysym-table) |
ba3854e2c98c
(x-keysym-table, x-selection-timeout, x-session-id, x-session-previous-id):
Juanma Barranquero <lekktu@gmail.com>
parents:
64701
diff
changeset
|
82 (defvar x-selection-timeout) |
ba3854e2c98c
(x-keysym-table, x-selection-timeout, x-session-id, x-session-previous-id):
Juanma Barranquero <lekktu@gmail.com>
parents:
64701
diff
changeset
|
83 (defvar x-session-id) |
ba3854e2c98c
(x-keysym-table, x-selection-timeout, x-session-id, x-session-previous-id):
Juanma Barranquero <lekktu@gmail.com>
parents:
64701
diff
changeset
|
84 (defvar x-session-previous-id) |
3373
4177a984e5c0
(x-invocation-args): Add defvar.
Richard M. Stallman <rms@gnu.org>
parents:
3287
diff
changeset
|
85 |
3081
63c51f1e885b
Pass x-command-line-resources to x-open-connection.
Richard M. Stallman <rms@gnu.org>
parents:
3070
diff
changeset
|
86 (defvar x-command-line-resources nil) |
63c51f1e885b
Pass x-command-line-resources to x-open-connection.
Richard M. Stallman <rms@gnu.org>
parents:
3070
diff
changeset
|
87 |
54 | 88 ;; Handler for switches of the form "-switch value" or "-switch". |
89 (defun x-handle-switch (switch) | |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
90 (let ((aelt (assoc switch command-line-x-option-alist))) |
54 | 91 (if aelt |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
92 (let ((param (nth 3 aelt)) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
93 (value (nth 4 aelt))) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
94 (if value |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
95 (setq default-frame-alist |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
96 (cons (cons param value) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
97 default-frame-alist)) |
779 | 98 (setq default-frame-alist |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
99 (cons (cons param |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
100 (car x-invocation-args)) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
101 default-frame-alist) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
102 x-invocation-args (cdr x-invocation-args))))))) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
103 |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
104 ;; Handler for switches of the form "-switch n" |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
105 (defun x-handle-numeric-switch (switch) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
106 (let ((aelt (assoc switch command-line-x-option-alist))) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
107 (if aelt |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
108 (let ((param (nth 3 aelt))) |
779 | 109 (setq default-frame-alist |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
110 (cons (cons param |
62402
a7e02ef1e3d6
Replace `string-to-int' by `string-to-number'.
Juanma Barranquero <lekktu@gmail.com>
parents:
62249
diff
changeset
|
111 (string-to-number (car x-invocation-args))) |
779 | 112 default-frame-alist) |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
113 x-invocation-args |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
114 (cdr x-invocation-args)))))) |
54 | 115 |
42710
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
116 ;; Handle options that apply to initial frame only |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
117 (defun x-handle-initial-switch (switch) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
118 (let ((aelt (assoc switch command-line-x-option-alist))) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
119 (if aelt |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
120 (let ((param (nth 3 aelt)) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
121 (value (nth 4 aelt))) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
122 (if value |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
123 (setq initial-frame-alist |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
124 (cons (cons param value) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
125 initial-frame-alist)) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
126 (setq initial-frame-alist |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
127 (cons (cons param |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
128 (car x-invocation-args)) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
129 initial-frame-alist) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
130 x-invocation-args (cdr x-invocation-args))))))) |
036b67c8fc3f
(x-handle-initial-switch): New function.
Eli Zaretskii <eliz@gnu.org>
parents:
42286
diff
changeset
|
131 |
4306
2e51ffb537a8
(x-handle-iconic): New function.
Richard M. Stallman <rms@gnu.org>
parents:
4280
diff
changeset
|
132 ;; Make -iconic apply only to the initial frame! |
2e51ffb537a8
(x-handle-iconic): New function.
Richard M. Stallman <rms@gnu.org>
parents:
4280
diff
changeset
|
133 (defun x-handle-iconic (switch) |
2e51ffb537a8
(x-handle-iconic): New function.
Richard M. Stallman <rms@gnu.org>
parents:
4280
diff
changeset
|
134 (setq initial-frame-alist |
2e51ffb537a8
(x-handle-iconic): New function.
Richard M. Stallman <rms@gnu.org>
parents:
4280
diff
changeset
|
135 (cons '(visibility . icon) initial-frame-alist))) |
2e51ffb537a8
(x-handle-iconic): New function.
Richard M. Stallman <rms@gnu.org>
parents:
4280
diff
changeset
|
136 |
4132
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
137 ;; Handle the -xrm option. |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
138 (defun x-handle-xrm-switch (switch) |
36582
30246e46027e
(x-handle-xrm-switch): Accept more than one -xrm
Gerd Moellmann <gerd@gnu.org>
parents:
33917
diff
changeset
|
139 (unless (consp x-invocation-args) |
30246e46027e
(x-handle-xrm-switch): Accept more than one -xrm
Gerd Moellmann <gerd@gnu.org>
parents:
33917
diff
changeset
|
140 (error "%s: missing argument to `%s' option" (invocation-name) switch)) |
30246e46027e
(x-handle-xrm-switch): Accept more than one -xrm
Gerd Moellmann <gerd@gnu.org>
parents:
33917
diff
changeset
|
141 (setq x-command-line-resources |
30246e46027e
(x-handle-xrm-switch): Accept more than one -xrm
Gerd Moellmann <gerd@gnu.org>
parents:
33917
diff
changeset
|
142 (if (null x-command-line-resources) |
30246e46027e
(x-handle-xrm-switch): Accept more than one -xrm
Gerd Moellmann <gerd@gnu.org>
parents:
33917
diff
changeset
|
143 (car x-invocation-args) |
30246e46027e
(x-handle-xrm-switch): Accept more than one -xrm
Gerd Moellmann <gerd@gnu.org>
parents:
33917
diff
changeset
|
144 (concat x-command-line-resources "\n" (car x-invocation-args)))) |
3081
63c51f1e885b
Pass x-command-line-resources to x-open-connection.
Richard M. Stallman <rms@gnu.org>
parents:
3070
diff
changeset
|
145 (setq x-invocation-args (cdr x-invocation-args))) |
63c51f1e885b
Pass x-command-line-resources to x-open-connection.
Richard M. Stallman <rms@gnu.org>
parents:
3070
diff
changeset
|
146 |
54 | 147 ;; Handle the geometry option |
148 (defun x-handle-geometry (switch) | |
42286
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
149 (let* ((geo (x-parse-geometry (car x-invocation-args))) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
150 (left (assq 'left geo)) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
151 (top (assq 'top geo)) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
152 (height (assq 'height geo)) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
153 (width (assq 'width geo))) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
154 (if (or height width) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
155 (setq default-frame-alist |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
156 (append default-frame-alist |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
157 '((user-size . t)) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
158 (if height (list height)) |
42932
5676a5820a04
(x-handle-geometry): Put sizes on both
Richard M. Stallman <rms@gnu.org>
parents:
42710
diff
changeset
|
159 (if width (list width))) |
5676a5820a04
(x-handle-geometry): Put sizes on both
Richard M. Stallman <rms@gnu.org>
parents:
42710
diff
changeset
|
160 initial-frame-alist |
5676a5820a04
(x-handle-geometry): Put sizes on both
Richard M. Stallman <rms@gnu.org>
parents:
42710
diff
changeset
|
161 (append initial-frame-alist |
5676a5820a04
(x-handle-geometry): Put sizes on both
Richard M. Stallman <rms@gnu.org>
parents:
42710
diff
changeset
|
162 '((user-size . t)) |
5676a5820a04
(x-handle-geometry): Put sizes on both
Richard M. Stallman <rms@gnu.org>
parents:
42710
diff
changeset
|
163 (if height (list height)) |
42286
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
164 (if width (list width))))) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
165 (if (or left top) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
166 (setq initial-frame-alist |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
167 (append initial-frame-alist |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
168 '((user-position . t)) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
169 (if left (list left)) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
170 (if top (list top))))) |
ce0c926022b3
(x-handle-geometry): Put height and width on default-frame-alist,
Richard M. Stallman <rms@gnu.org>
parents:
39400
diff
changeset
|
171 (setq x-invocation-args (cdr x-invocation-args)))) |
54 | 172 |
15538
9ed106f6e1be
(x-handle-name-switch): Renamed from x-handle-name-rn-switch.
Richard M. Stallman <rms@gnu.org>
parents:
15058
diff
changeset
|
173 ;; Handle the -name option. Set the variable x-resource-name |
9ed106f6e1be
(x-handle-name-switch): Renamed from x-handle-name-rn-switch.
Richard M. Stallman <rms@gnu.org>
parents:
15058
diff
changeset
|
174 ;; to the option's operand; set the name of |
4132
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
175 ;; the initial frame, too. |
15538
9ed106f6e1be
(x-handle-name-switch): Renamed from x-handle-name-rn-switch.
Richard M. Stallman <rms@gnu.org>
parents:
15058
diff
changeset
|
176 (defun x-handle-name-switch (switch) |
4132
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
177 (or (consp x-invocation-args) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
178 (error "%s: missing argument to `%s' option" (invocation-name) switch)) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
179 (setq x-resource-name (car x-invocation-args) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
180 x-invocation-args (cdr x-invocation-args)) |
15538
9ed106f6e1be
(x-handle-name-switch): Renamed from x-handle-name-rn-switch.
Richard M. Stallman <rms@gnu.org>
parents:
15058
diff
changeset
|
181 (setq initial-frame-alist (cons (cons 'name x-resource-name) |
9ed106f6e1be
(x-handle-name-switch): Renamed from x-handle-name-rn-switch.
Richard M. Stallman <rms@gnu.org>
parents:
15058
diff
changeset
|
182 initial-frame-alist))) |
4132
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
183 |
54 | 184 (defvar x-display-name nil |
779 | 185 "The X display name specifying server and X frame.") |
54 | 186 |
187 (defun x-handle-display (switch) | |
188 (setq x-display-name (car x-invocation-args) | |
14977
2910a512c515
(x-handle-display): Set DISPLAY envvar too.
Richard M. Stallman <rms@gnu.org>
parents:
14170
diff
changeset
|
189 x-invocation-args (cdr x-invocation-args)) |
2910a512c515
(x-handle-display): Set DISPLAY envvar too.
Richard M. Stallman <rms@gnu.org>
parents:
14170
diff
changeset
|
190 ;; Make subshell programs see the same DISPLAY value Emacs really uses. |
2910a512c515
(x-handle-display): Set DISPLAY envvar too.
Richard M. Stallman <rms@gnu.org>
parents:
14170
diff
changeset
|
191 ;; Note that this isn't completely correct, since Emacs can use |
2910a512c515
(x-handle-display): Set DISPLAY envvar too.
Richard M. Stallman <rms@gnu.org>
parents:
14170
diff
changeset
|
192 ;; multiple displays. However, there is no way to tell an already |
2910a512c515
(x-handle-display): Set DISPLAY envvar too.
Richard M. Stallman <rms@gnu.org>
parents:
14170
diff
changeset
|
193 ;; running subshell which display the user is currently typing on. |
2910a512c515
(x-handle-display): Set DISPLAY envvar too.
Richard M. Stallman <rms@gnu.org>
parents:
14170
diff
changeset
|
194 (setenv "DISPLAY" x-display-name)) |
54 | 195 |
321 | 196 (defun x-handle-args (args) |
6698
b107e54218fe
(x-select-enable-clipboard): New variable.
Richard M. Stallman <rms@gnu.org>
parents:
6399
diff
changeset
|
197 "Process the X-related command line options in ARGS. |
b107e54218fe
(x-select-enable-clipboard): New variable.
Richard M. Stallman <rms@gnu.org>
parents:
6399
diff
changeset
|
198 This is done before the user's startup file is loaded. They are copied to |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
199 `x-invocation-args', from which the X-related things are extracted, first |
321 | 200 the switch (e.g., \"-fg\") in the following code, and possible values |
7639 | 201 \(e.g., \"black\") in the option handler code (e.g., x-handle-switch). |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
202 This function returns ARGS minus the arguments that have been processed." |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
203 ;; We use ARGS to accumulate the args that we don't handle here, to return. |
273 | 204 (setq x-invocation-args args |
205 args nil) | |
16835
7584a510ad85
(x-handle-args): Stop arg processing
Richard M. Stallman <rms@gnu.org>
parents:
15815
diff
changeset
|
206 (while (and x-invocation-args |
7584a510ad85
(x-handle-args): Stop arg processing
Richard M. Stallman <rms@gnu.org>
parents:
15815
diff
changeset
|
207 (not (equal (car x-invocation-args) "--"))) |
273 | 208 (let* ((this-switch (car x-invocation-args)) |
10027
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
209 (orig-this-switch this-switch) |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
210 completion argval aelt handler) |
273 | 211 (setq x-invocation-args (cdr x-invocation-args)) |
10027
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
212 ;; Check for long options with attached arguments |
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
213 ;; and separate out the attached option argument into argval. |
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
214 (if (string-match "^--[^=]*=" this-switch) |
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
215 (setq argval (substring this-switch (match-end 0)) |
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
216 this-switch (substring this-switch 0 (1- (match-end 0))))) |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
217 ;; Complete names of long options. |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
218 (if (string-match "^--" this-switch) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
219 (progn |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
220 (setq completion (try-completion this-switch command-line-x-option-alist)) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
221 (if (eq completion t) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
222 ;; Exact match for long option. |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
223 nil |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
224 (if (stringp completion) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
225 (let ((elt (assoc completion command-line-x-option-alist))) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
226 ;; Check for abbreviated long option. |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
227 (or elt |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
228 (error "Option `%s' is ambiguous" this-switch)) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
229 (setq this-switch completion)))))) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
230 (setq aelt (assoc this-switch command-line-x-option-alist)) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
231 (if aelt (setq handler (nth 2 aelt))) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
232 (if handler |
10027
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
233 (if argval |
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
234 (let ((x-invocation-args |
bb1027a75918
(x-option-alist): New variable now holds
Richard M. Stallman <rms@gnu.org>
parents:
9681
diff
changeset
|
235 (cons argval x-invocation-args))) |
13891
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
236 (funcall handler this-switch)) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
237 (funcall handler this-switch)) |
0e813fc58516
(x-handle-switch, x-handle-numeric-switch)
Richard M. Stallman <rms@gnu.org>
parents:
13376
diff
changeset
|
238 (setq args (cons orig-this-switch args))))) |
16835
7584a510ad85
(x-handle-args): Stop arg processing
Richard M. Stallman <rms@gnu.org>
parents:
15815
diff
changeset
|
239 (nconc (nreverse args) x-invocation-args)) |
43820
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
240 |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
241 ;; Handle the --smid switch. This is used by the session manager |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
242 ;; to give us back our session id we had on the previous run. |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
243 (defun x-handle-smid (switch) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
244 (or (consp x-invocation-args) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
245 (error "%s: missing argument to `%s' option" (invocation-name) switch)) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
246 (setq x-session-previous-id (car x-invocation-args) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
247 x-invocation-args (cdr x-invocation-args))) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
248 |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
249 (defvar emacs-save-session-functions nil |
51181
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
250 "Special hook run when a save-session event occurs. |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
251 The functions do not get any argument. |
43820
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
252 Functions can return non-nil to inform the session manager that the |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
253 window system shutdown should be aborted. |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
254 |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
255 See also `emacs-session-save'.") |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
256 |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
257 (defun emacs-session-filename (session-id) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
258 "Construct a filename to save the session in based on SESSION-ID. |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
259 If the directory ~/.emacs.d exists, we make a filename in there, otherwise |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
260 a file in the home directory." |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
261 (let ((basename (concat "session." session-id)) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
262 (emacs-dir "~/.emacs.d/")) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
263 (expand-file-name (if (file-directory-p emacs-dir) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
264 (concat emacs-dir basename) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
265 (concat "~/.emacs-" basename))))) |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
266 |
43820
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
267 (defun emacs-session-save () |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
268 "This function is called when the window system is shutting down. |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
269 If this function returns non-nil, the window system shutdown is cancelled. |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
270 |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
271 When a session manager tells Emacs that the window system is shutting |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
272 down, this function is called. It calls the functions in the hook |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
273 `emacs-save-session-functions'. Functions are called with the current |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
274 buffer set to a temporary buffer. Functions should use `insert' to insert |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
275 lisp code to save the session state. The buffer is saved |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
276 in a file in the home directory of the user running Emacs. The file |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
277 is evaluated when Emacs is restarted by the session manager. |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
278 |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
279 If any of the functions returns non-nil, no more functions are called |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
280 and this function returns non-nil. This will inform the session manager |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
281 that it should abort the window system shutdown." |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
282 (let ((filename (emacs-session-filename x-session-id)) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
283 (buf (get-buffer-create (concat " *SES " x-session-id)))) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
284 (when (file-exists-p filename) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
285 (delete-file filename)) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
286 (with-current-buffer buf |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
287 (let ((cancel-shutdown (condition-case nil |
43869
606bb58da5c4
(emacs-session-save): Add comment that return t means cancel shutdown
Jan Djärv <jan.h.d@swipnet.se>
parents:
43866
diff
changeset
|
288 ;; A return of t means cancel the shutdown. |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
289 (run-hook-with-args-until-success |
43820
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
290 'emacs-save-session-functions) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
291 (error t)))) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
292 (unless cancel-shutdown |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
293 (write-file filename)) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
294 (kill-buffer buf) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
295 cancel-shutdown)))) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
296 |
43866
9ec4ee6f4529
(emacs-session-restore): Take previous id as an argument.
Jan Djärv <jan.h.d@swipnet.se>
parents:
43820
diff
changeset
|
297 (defun emacs-session-restore (previous-session-id) |
43820
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
298 "Restore the Emacs session if started by a session manager. |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
299 The file saved by `emacs-session-save' is evaluated and deleted if it |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
300 exists." |
43866
9ec4ee6f4529
(emacs-session-restore): Take previous id as an argument.
Jan Djärv <jan.h.d@swipnet.se>
parents:
43820
diff
changeset
|
301 (let ((filename (emacs-session-filename previous-session-id))) |
43820
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
302 (when (file-exists-p filename) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
303 (load-file filename) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
304 (delete-file filename) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
305 (message "Restored session data")))) |
41972a678f62
(x-handle-smid): New function.
Jan Djärv <jan.h.d@swipnet.se>
parents:
42932
diff
changeset
|
306 |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
307 |
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
308 |
54 | 309 |
310 ;; | |
311 ;; Standard X cursor shapes, courtesy of Mr. Fox, who wanted ALL of them. | |
312 ;; | |
313 | |
314 (defconst x-pointer-X-cursor 0) | |
315 (defconst x-pointer-arrow 2) | |
316 (defconst x-pointer-based-arrow-down 4) | |
317 (defconst x-pointer-based-arrow-up 6) | |
318 (defconst x-pointer-boat 8) | |
319 (defconst x-pointer-bogosity 10) | |
320 (defconst x-pointer-bottom-left-corner 12) | |
321 (defconst x-pointer-bottom-right-corner 14) | |
322 (defconst x-pointer-bottom-side 16) | |
323 (defconst x-pointer-bottom-tee 18) | |
324 (defconst x-pointer-box-spiral 20) | |
325 (defconst x-pointer-center-ptr 22) | |
326 (defconst x-pointer-circle 24) | |
327 (defconst x-pointer-clock 26) | |
328 (defconst x-pointer-coffee-mug 28) | |
329 (defconst x-pointer-cross 30) | |
330 (defconst x-pointer-cross-reverse 32) | |
331 (defconst x-pointer-crosshair 34) | |
332 (defconst x-pointer-diamond-cross 36) | |
333 (defconst x-pointer-dot 38) | |
334 (defconst x-pointer-dotbox 40) | |
335 (defconst x-pointer-double-arrow 42) | |
336 (defconst x-pointer-draft-large 44) | |
337 (defconst x-pointer-draft-small 46) | |
338 (defconst x-pointer-draped-box 48) | |
339 (defconst x-pointer-exchange 50) | |
340 (defconst x-pointer-fleur 52) | |
341 (defconst x-pointer-gobbler 54) | |
342 (defconst x-pointer-gumby 56) | |
343 (defconst x-pointer-hand1 58) | |
344 (defconst x-pointer-hand2 60) | |
345 (defconst x-pointer-heart 62) | |
346 (defconst x-pointer-icon 64) | |
347 (defconst x-pointer-iron-cross 66) | |
348 (defconst x-pointer-left-ptr 68) | |
349 (defconst x-pointer-left-side 70) | |
350 (defconst x-pointer-left-tee 72) | |
351 (defconst x-pointer-leftbutton 74) | |
352 (defconst x-pointer-ll-angle 76) | |
353 (defconst x-pointer-lr-angle 78) | |
354 (defconst x-pointer-man 80) | |
355 (defconst x-pointer-middlebutton 82) | |
356 (defconst x-pointer-mouse 84) | |
357 (defconst x-pointer-pencil 86) | |
358 (defconst x-pointer-pirate 88) | |
359 (defconst x-pointer-plus 90) | |
360 (defconst x-pointer-question-arrow 92) | |
361 (defconst x-pointer-right-ptr 94) | |
362 (defconst x-pointer-right-side 96) | |
363 (defconst x-pointer-right-tee 98) | |
364 (defconst x-pointer-rightbutton 100) | |
365 (defconst x-pointer-rtl-logo 102) | |
366 (defconst x-pointer-sailboat 104) | |
367 (defconst x-pointer-sb-down-arrow 106) | |
368 (defconst x-pointer-sb-h-double-arrow 108) | |
369 (defconst x-pointer-sb-left-arrow 110) | |
370 (defconst x-pointer-sb-right-arrow 112) | |
371 (defconst x-pointer-sb-up-arrow 114) | |
372 (defconst x-pointer-sb-v-double-arrow 116) | |
373 (defconst x-pointer-shuttle 118) | |
374 (defconst x-pointer-sizing 120) | |
375 (defconst x-pointer-spider 122) | |
376 (defconst x-pointer-spraycan 124) | |
377 (defconst x-pointer-star 126) | |
378 (defconst x-pointer-target 128) | |
379 (defconst x-pointer-tcross 130) | |
380 (defconst x-pointer-top-left-arrow 132) | |
381 (defconst x-pointer-top-left-corner 134) | |
382 (defconst x-pointer-top-right-corner 136) | |
383 (defconst x-pointer-top-side 138) | |
384 (defconst x-pointer-top-tee 140) | |
385 (defconst x-pointer-trek 142) | |
386 (defconst x-pointer-ul-angle 144) | |
387 (defconst x-pointer-umbrella 146) | |
388 (defconst x-pointer-ur-angle 148) | |
389 (defconst x-pointer-watch 150) | |
390 (defconst x-pointer-xterm 152) | |
391 | |
392 ;; | |
393 ;; Available colors | |
394 ;; | |
395 | |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
396 (defvar x-colors '("LightGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
397 "light green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
398 "DarkRed" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
399 "dark red" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
400 "DarkMagenta" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
401 "dark magenta" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
402 "DarkCyan" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
403 "dark cyan" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
404 "DarkBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
405 "dark blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
406 "DarkGray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
407 "dark gray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
408 "DarkGrey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
409 "dark grey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
410 "grey100" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
411 "gray100" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
412 "grey99" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
413 "gray99" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
414 "grey98" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
415 "gray98" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
416 "grey97" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
417 "gray97" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
418 "grey96" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
419 "gray96" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
420 "grey95" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
421 "gray95" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
422 "grey94" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
423 "gray94" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
424 "grey93" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
425 "gray93" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
426 "grey92" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
427 "gray92" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
428 "grey91" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
429 "gray91" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
430 "grey90" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
431 "gray90" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
432 "grey89" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
433 "gray89" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
434 "grey88" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
435 "gray88" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
436 "grey87" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
437 "gray87" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
438 "grey86" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
439 "gray86" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
440 "grey85" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
441 "gray85" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
442 "grey84" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
443 "gray84" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
444 "grey83" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
445 "gray83" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
446 "grey82" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
447 "gray82" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
448 "grey81" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
449 "gray81" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
450 "grey80" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
451 "gray80" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
452 "grey79" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
453 "gray79" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
454 "grey78" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
455 "gray78" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
456 "grey77" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
457 "gray77" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
458 "grey76" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
459 "gray76" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
460 "grey75" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
461 "gray75" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
462 "grey74" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
463 "gray74" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
464 "grey73" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
465 "gray73" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
466 "grey72" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
467 "gray72" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
468 "grey71" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
469 "gray71" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
470 "grey70" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
471 "gray70" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
472 "grey69" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
473 "gray69" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
474 "grey68" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
475 "gray68" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
476 "grey67" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
477 "gray67" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
478 "grey66" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
479 "gray66" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
480 "grey65" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
481 "gray65" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
482 "grey64" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
483 "gray64" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
484 "grey63" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
485 "gray63" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
486 "grey62" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
487 "gray62" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
488 "grey61" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
489 "gray61" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
490 "grey60" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
491 "gray60" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
492 "grey59" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
493 "gray59" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
494 "grey58" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
495 "gray58" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
496 "grey57" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
497 "gray57" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
498 "grey56" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
499 "gray56" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
500 "grey55" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
501 "gray55" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
502 "grey54" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
503 "gray54" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
504 "grey53" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
505 "gray53" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
506 "grey52" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
507 "gray52" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
508 "grey51" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
509 "gray51" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
510 "grey50" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
511 "gray50" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
512 "grey49" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
513 "gray49" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
514 "grey48" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
515 "gray48" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
516 "grey47" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
517 "gray47" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
518 "grey46" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
519 "gray46" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
520 "grey45" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
521 "gray45" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
522 "grey44" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
523 "gray44" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
524 "grey43" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
525 "gray43" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
526 "grey42" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
527 "gray42" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
528 "grey41" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
529 "gray41" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
530 "grey40" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
531 "gray40" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
532 "grey39" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
533 "gray39" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
534 "grey38" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
535 "gray38" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
536 "grey37" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
537 "gray37" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
538 "grey36" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
539 "gray36" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
540 "grey35" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
541 "gray35" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
542 "grey34" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
543 "gray34" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
544 "grey33" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
545 "gray33" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
546 "grey32" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
547 "gray32" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
548 "grey31" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
549 "gray31" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
550 "grey30" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
551 "gray30" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
552 "grey29" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
553 "gray29" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
554 "grey28" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
555 "gray28" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
556 "grey27" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
557 "gray27" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
558 "grey26" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
559 "gray26" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
560 "grey25" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
561 "gray25" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
562 "grey24" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
563 "gray24" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
564 "grey23" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
565 "gray23" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
566 "grey22" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
567 "gray22" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
568 "grey21" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
569 "gray21" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
570 "grey20" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
571 "gray20" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
572 "grey19" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
573 "gray19" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
574 "grey18" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
575 "gray18" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
576 "grey17" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
577 "gray17" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
578 "grey16" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
579 "gray16" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
580 "grey15" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
581 "gray15" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
582 "grey14" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
583 "gray14" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
584 "grey13" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
585 "gray13" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
586 "grey12" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
587 "gray12" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
588 "grey11" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
589 "gray11" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
590 "grey10" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
591 "gray10" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
592 "grey9" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
593 "gray9" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
594 "grey8" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
595 "gray8" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
596 "grey7" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
597 "gray7" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
598 "grey6" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
599 "gray6" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
600 "grey5" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
601 "gray5" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
602 "grey4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
603 "gray4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
604 "grey3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
605 "gray3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
606 "grey2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
607 "gray2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
608 "grey1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
609 "gray1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
610 "grey0" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
611 "gray0" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
612 "thistle4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
613 "thistle3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
614 "thistle2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
615 "thistle1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
616 "MediumPurple4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
617 "MediumPurple3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
618 "MediumPurple2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
619 "MediumPurple1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
620 "purple4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
621 "purple3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
622 "purple2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
623 "purple1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
624 "DarkOrchid4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
625 "DarkOrchid3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
626 "DarkOrchid2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
627 "DarkOrchid1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
628 "MediumOrchid4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
629 "MediumOrchid3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
630 "MediumOrchid2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
631 "MediumOrchid1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
632 "plum4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
633 "plum3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
634 "plum2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
635 "plum1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
636 "orchid4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
637 "orchid3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
638 "orchid2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
639 "orchid1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
640 "magenta4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
641 "magenta3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
642 "magenta2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
643 "magenta1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
644 "VioletRed4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
645 "VioletRed3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
646 "VioletRed2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
647 "VioletRed1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
648 "maroon4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
649 "maroon3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
650 "maroon2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
651 "maroon1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
652 "PaleVioletRed4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
653 "PaleVioletRed3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
654 "PaleVioletRed2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
655 "PaleVioletRed1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
656 "LightPink4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
657 "LightPink3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
658 "LightPink2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
659 "LightPink1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
660 "pink4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
661 "pink3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
662 "pink2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
663 "pink1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
664 "HotPink4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
665 "HotPink3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
666 "HotPink2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
667 "HotPink1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
668 "DeepPink4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
669 "DeepPink3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
670 "DeepPink2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
671 "DeepPink1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
672 "red4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
673 "red3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
674 "red2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
675 "red1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
676 "OrangeRed4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
677 "OrangeRed3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
678 "OrangeRed2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
679 "OrangeRed1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
680 "tomato4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
681 "tomato3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
682 "tomato2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
683 "tomato1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
684 "coral4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
685 "coral3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
686 "coral2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
687 "coral1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
688 "DarkOrange4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
689 "DarkOrange3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
690 "DarkOrange2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
691 "DarkOrange1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
692 "orange4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
693 "orange3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
694 "orange2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
695 "orange1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
696 "LightSalmon4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
697 "LightSalmon3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
698 "LightSalmon2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
699 "LightSalmon1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
700 "salmon4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
701 "salmon3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
702 "salmon2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
703 "salmon1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
704 "brown4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
705 "brown3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
706 "brown2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
707 "brown1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
708 "firebrick4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
709 "firebrick3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
710 "firebrick2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
711 "firebrick1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
712 "chocolate4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
713 "chocolate3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
714 "chocolate2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
715 "chocolate1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
716 "tan4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
717 "tan3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
718 "tan2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
719 "tan1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
720 "wheat4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
721 "wheat3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
722 "wheat2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
723 "wheat1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
724 "burlywood4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
725 "burlywood3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
726 "burlywood2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
727 "burlywood1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
728 "sienna4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
729 "sienna3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
730 "sienna2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
731 "sienna1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
732 "IndianRed4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
733 "IndianRed3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
734 "IndianRed2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
735 "IndianRed1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
736 "RosyBrown4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
737 "RosyBrown3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
738 "RosyBrown2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
739 "RosyBrown1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
740 "DarkGoldenrod4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
741 "DarkGoldenrod3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
742 "DarkGoldenrod2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
743 "DarkGoldenrod1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
744 "goldenrod4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
745 "goldenrod3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
746 "goldenrod2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
747 "goldenrod1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
748 "gold4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
749 "gold3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
750 "gold2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
751 "gold1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
752 "yellow4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
753 "yellow3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
754 "yellow2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
755 "yellow1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
756 "LightYellow4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
757 "LightYellow3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
758 "LightYellow2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
759 "LightYellow1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
760 "LightGoldenrod4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
761 "LightGoldenrod3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
762 "LightGoldenrod2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
763 "LightGoldenrod1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
764 "khaki4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
765 "khaki3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
766 "khaki2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
767 "khaki1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
768 "DarkOliveGreen4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
769 "DarkOliveGreen3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
770 "DarkOliveGreen2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
771 "DarkOliveGreen1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
772 "OliveDrab4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
773 "OliveDrab3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
774 "OliveDrab2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
775 "OliveDrab1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
776 "chartreuse4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
777 "chartreuse3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
778 "chartreuse2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
779 "chartreuse1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
780 "green4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
781 "green3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
782 "green2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
783 "green1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
784 "SpringGreen4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
785 "SpringGreen3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
786 "SpringGreen2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
787 "SpringGreen1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
788 "PaleGreen4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
789 "PaleGreen3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
790 "PaleGreen2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
791 "PaleGreen1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
792 "SeaGreen4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
793 "SeaGreen3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
794 "SeaGreen2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
795 "SeaGreen1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
796 "DarkSeaGreen4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
797 "DarkSeaGreen3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
798 "DarkSeaGreen2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
799 "DarkSeaGreen1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
800 "aquamarine4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
801 "aquamarine3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
802 "aquamarine2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
803 "aquamarine1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
804 "DarkSlateGray4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
805 "DarkSlateGray3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
806 "DarkSlateGray2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
807 "DarkSlateGray1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
808 "cyan4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
809 "cyan3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
810 "cyan2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
811 "cyan1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
812 "turquoise4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
813 "turquoise3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
814 "turquoise2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
815 "turquoise1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
816 "CadetBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
817 "CadetBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
818 "CadetBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
819 "CadetBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
820 "PaleTurquoise4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
821 "PaleTurquoise3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
822 "PaleTurquoise2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
823 "PaleTurquoise1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
824 "LightCyan4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
825 "LightCyan3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
826 "LightCyan2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
827 "LightCyan1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
828 "LightBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
829 "LightBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
830 "LightBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
831 "LightBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
832 "LightSteelBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
833 "LightSteelBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
834 "LightSteelBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
835 "LightSteelBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
836 "SlateGray4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
837 "SlateGray3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
838 "SlateGray2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
839 "SlateGray1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
840 "LightSkyBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
841 "LightSkyBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
842 "LightSkyBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
843 "LightSkyBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
844 "SkyBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
845 "SkyBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
846 "SkyBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
847 "SkyBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
848 "DeepSkyBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
849 "DeepSkyBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
850 "DeepSkyBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
851 "DeepSkyBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
852 "SteelBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
853 "SteelBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
854 "SteelBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
855 "SteelBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
856 "DodgerBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
857 "DodgerBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
858 "DodgerBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
859 "DodgerBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
860 "blue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
861 "blue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
862 "blue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
863 "blue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
864 "RoyalBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
865 "RoyalBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
866 "RoyalBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
867 "RoyalBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
868 "SlateBlue4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
869 "SlateBlue3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
870 "SlateBlue2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
871 "SlateBlue1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
872 "azure4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
873 "azure3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
874 "azure2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
875 "azure1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
876 "MistyRose4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
877 "MistyRose3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
878 "MistyRose2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
879 "MistyRose1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
880 "LavenderBlush4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
881 "LavenderBlush3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
882 "LavenderBlush2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
883 "LavenderBlush1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
884 "honeydew4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
885 "honeydew3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
886 "honeydew2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
887 "honeydew1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
888 "ivory4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
889 "ivory3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
890 "ivory2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
891 "ivory1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
892 "cornsilk4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
893 "cornsilk3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
894 "cornsilk2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
895 "cornsilk1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
896 "LemonChiffon4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
897 "LemonChiffon3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
898 "LemonChiffon2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
899 "LemonChiffon1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
900 "NavajoWhite4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
901 "NavajoWhite3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
902 "NavajoWhite2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
903 "NavajoWhite1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
904 "PeachPuff4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
905 "PeachPuff3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
906 "PeachPuff2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
907 "PeachPuff1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
908 "bisque4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
909 "bisque3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
910 "bisque2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
911 "bisque1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
912 "AntiqueWhite4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
913 "AntiqueWhite3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
914 "AntiqueWhite2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
915 "AntiqueWhite1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
916 "seashell4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
917 "seashell3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
918 "seashell2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
919 "seashell1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
920 "snow4" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
921 "snow3" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
922 "snow2" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
923 "snow1" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
924 "thistle" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
925 "MediumPurple" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
926 "medium purple" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
927 "purple" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
928 "BlueViolet" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
929 "blue violet" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
930 "DarkViolet" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
931 "dark violet" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
932 "DarkOrchid" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
933 "dark orchid" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
934 "MediumOrchid" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
935 "medium orchid" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
936 "orchid" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
937 "plum" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
938 "violet" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
939 "magenta" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
940 "VioletRed" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
941 "violet red" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
942 "MediumVioletRed" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
943 "medium violet red" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
944 "maroon" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
945 "PaleVioletRed" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
946 "pale violet red" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
947 "LightPink" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
948 "light pink" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
949 "pink" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
950 "DeepPink" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
951 "deep pink" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
952 "HotPink" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
953 "hot pink" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
954 "red" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
955 "OrangeRed" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
956 "orange red" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
957 "tomato" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
958 "LightCoral" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
959 "light coral" |
54 | 960 "coral" |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
961 "DarkOrange" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
962 "dark orange" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
963 "orange" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
964 "LightSalmon" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
965 "light salmon" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
966 "salmon" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
967 "DarkSalmon" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
968 "dark salmon" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
969 "brown" |
54 | 970 "firebrick" |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
971 "chocolate" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
972 "tan" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
973 "SandyBrown" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
974 "sandy brown" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
975 "wheat" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
976 "beige" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
977 "burlywood" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
978 "peru" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
979 "sienna" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
980 "SaddleBrown" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
981 "saddle brown" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
982 "IndianRed" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
983 "indian red" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
984 "RosyBrown" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
985 "rosy brown" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
986 "DarkGoldenrod" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
987 "dark goldenrod" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
988 "goldenrod" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
989 "LightGoldenrod" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
990 "light goldenrod" |
54 | 991 "gold" |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
992 "yellow" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
993 "LightYellow" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
994 "light yellow" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
995 "LightGoldenrodYellow" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
996 "light goldenrod yellow" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
997 "PaleGoldenrod" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
998 "pale goldenrod" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
999 "khaki" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1000 "DarkKhaki" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1001 "dark khaki" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1002 "OliveDrab" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1003 "olive drab" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1004 "ForestGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1005 "forest green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1006 "YellowGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1007 "yellow green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1008 "LimeGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1009 "lime green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1010 "GreenYellow" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1011 "green yellow" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1012 "MediumSpringGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1013 "medium spring green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1014 "chartreuse" |
54 | 1015 "green" |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1016 "LawnGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1017 "lawn green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1018 "SpringGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1019 "spring green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1020 "PaleGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1021 "pale green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1022 "LightSeaGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1023 "light sea green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1024 "MediumSeaGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1025 "medium sea green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1026 "SeaGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1027 "sea green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1028 "DarkSeaGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1029 "dark sea green" |
54 | 1030 "DarkOliveGreen" |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1031 "dark olive green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1032 "DarkGreen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1033 "dark green" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1034 "aquamarine" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1035 "MediumAquamarine" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1036 "medium aquamarine" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1037 "CadetBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1038 "cadet blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1039 "LightCyan" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1040 "light cyan" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1041 "cyan" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1042 "turquoise" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1043 "MediumTurquoise" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1044 "medium turquoise" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1045 "DarkTurquoise" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1046 "dark turquoise" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1047 "PaleTurquoise" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1048 "pale turquoise" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1049 "PowderBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1050 "powder blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1051 "LightBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1052 "light blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1053 "LightSteelBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1054 "light steel blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1055 "SteelBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1056 "steel blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1057 "LightSkyBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1058 "light sky blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1059 "SkyBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1060 "sky blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1061 "DeepSkyBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1062 "deep sky blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1063 "DodgerBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1064 "dodger blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1065 "blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1066 "RoyalBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1067 "royal blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1068 "MediumBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1069 "medium blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1070 "LightSlateBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1071 "light slate blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1072 "MediumSlateBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1073 "medium slate blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1074 "SlateBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1075 "slate blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1076 "DarkSlateBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1077 "dark slate blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1078 "CornflowerBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1079 "cornflower blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1080 "NavyBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1081 "navy blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1082 "navy" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1083 "MidnightBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1084 "midnight blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1085 "LightGray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1086 "light gray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1087 "LightGrey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1088 "light grey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1089 "grey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1090 "gray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1091 "LightSlateGrey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1092 "light slate grey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1093 "LightSlateGray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1094 "light slate gray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1095 "SlateGrey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1096 "slate grey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1097 "SlateGray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1098 "slate gray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1099 "DimGrey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1100 "dim grey" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1101 "DimGray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1102 "dim gray" |
54 | 1103 "DarkSlateGrey" |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1104 "dark slate grey" |
54 | 1105 "DarkSlateGray" |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1106 "dark slate gray" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1107 "black" |
54 | 1108 "white" |
29555
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1109 "MistyRose" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1110 "misty rose" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1111 "LavenderBlush" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1112 "lavender blush" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1113 "lavender" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1114 "AliceBlue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1115 "alice blue" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1116 "azure" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1117 "MintCream" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1118 "mint cream" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1119 "honeydew" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1120 "seashell" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1121 "LemonChiffon" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1122 "lemon chiffon" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1123 "ivory" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1124 "cornsilk" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1125 "moccasin" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1126 "NavajoWhite" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1127 "navajo white" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1128 "PeachPuff" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1129 "peach puff" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1130 "bisque" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1131 "BlanchedAlmond" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1132 "blanched almond" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1133 "PapayaWhip" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1134 "papaya whip" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1135 "AntiqueWhite" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1136 "antique white" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1137 "linen" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1138 "OldLace" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1139 "old lace" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1140 "FloralWhite" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1141 "floral white" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1142 "gainsboro" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1143 "WhiteSmoke" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1144 "white smoke" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1145 "GhostWhite" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1146 "ghost white" |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1147 "snow") |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1148 "The list of X colors from the `rgb.txt' file. |
ec45256eb961
(x-colors): Add colors from recent rgb.txt.
Gerd Moellmann <gerd@gnu.org>
parents:
28217
diff
changeset
|
1149 XConsortium: rgb.txt,v 10.41 94/02/20 18:39:36 rws Exp") |
54 | 1150 |
26736
a0674327c167
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
23903
diff
changeset
|
1151 (defun xw-defined-colors (&optional frame) |
a0674327c167
Changes for automatic remapping of X colors on terminal frames:
Eli Zaretskii <eliz@gnu.org>
parents:
23903
diff
changeset
|
1152 "Internal function called by `defined-colors', which see." |
11466
8fb524439d09
(x-defined-colors): Take frame as optional arg.
Richard M. Stallman <rms@gnu.org>
parents:
11319
diff
changeset
|
1153 (or frame (setq frame (selected-frame))) |
54 | 1154 (let ((all-colors x-colors) |
1155 (this-color nil) | |
1156 (defined-colors nil)) | |
1157 (while all-colors | |
1158 (setq this-color (car all-colors) | |
1159 all-colors (cdr all-colors)) | |
27101
a5791b2ee668
(xw-defined-colors): Call color-supported-p,
Eli Zaretskii <eliz@gnu.org>
parents:
26736
diff
changeset
|
1160 (and (color-supported-p this-color frame t) |
54 | 1161 (setq defined-colors (cons this-color defined-colors)))) |
1162 defined-colors)) | |
396 | 1163 |
1164 ;;;; Function keys | |
1165 | |
4313
87472f1eb031
(iconify-or-deiconify-frame): New function. Use it for C-z.
Richard M. Stallman <rms@gnu.org>
parents:
4306
diff
changeset
|
1166 (substitute-key-definition 'suspend-emacs 'iconify-or-deiconify-frame |
87472f1eb031
(iconify-or-deiconify-frame): New function. Use it for C-z.
Richard M. Stallman <rms@gnu.org>
parents:
4306
diff
changeset
|
1167 global-map) |
1546 | 1168 |
2145
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1169 ;; Map certain keypad keys into ASCII characters |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1170 ;; that people usually expect. |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1171 (define-key function-key-map [backspace] [127]) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1172 (define-key function-key-map [delete] [127]) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1173 (define-key function-key-map [tab] [?\t]) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1174 (define-key function-key-map [linefeed] [?\n]) |
12970
b5262e218fa8
(function-key-map): Consistently map CLEAR to C-l.
Richard M. Stallman <rms@gnu.org>
parents:
12556
diff
changeset
|
1175 (define-key function-key-map [clear] [?\C-l]) |
b5262e218fa8
(function-key-map): Consistently map CLEAR to C-l.
Richard M. Stallman <rms@gnu.org>
parents:
12556
diff
changeset
|
1176 (define-key function-key-map [return] [?\C-m]) |
2145
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1177 (define-key function-key-map [escape] [?\e]) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1178 (define-key function-key-map [M-backspace] [?\M-\d]) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1179 (define-key function-key-map [M-delete] [?\M-\d]) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1180 (define-key function-key-map [M-tab] [?\M-\t]) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1181 (define-key function-key-map [M-linefeed] [?\M-\n]) |
12970
b5262e218fa8
(function-key-map): Consistently map CLEAR to C-l.
Richard M. Stallman <rms@gnu.org>
parents:
12556
diff
changeset
|
1182 (define-key function-key-map [M-clear] [?\M-\C-l]) |
b5262e218fa8
(function-key-map): Consistently map CLEAR to C-l.
Richard M. Stallman <rms@gnu.org>
parents:
12556
diff
changeset
|
1183 (define-key function-key-map [M-return] [?\M-\C-m]) |
2145
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1184 (define-key function-key-map [M-escape] [?\M-\e]) |
17244
6d46f493d819
(function-key-map): Define iso-lefttab.
Richard M. Stallman <rms@gnu.org>
parents:
17169
diff
changeset
|
1185 (define-key function-key-map [iso-lefttab] [backtab]) |
47198
3189c7c8ef18
(function-key-map): Define S-iso-lefttab.
Richard M. Stallman <rms@gnu.org>
parents:
45318
diff
changeset
|
1186 (define-key function-key-map [S-iso-lefttab] [backtab]) |
2145
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1187 |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1188 ;; These tell read-char how to convert |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1189 ;; these special chars to ASCII. |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1190 (put 'backspace 'ascii-character 127) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1191 (put 'delete 'ascii-character 127) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1192 (put 'tab 'ascii-character ?\t) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1193 (put 'linefeed 'ascii-character ?\n) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1194 (put 'clear 'ascii-character 12) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1195 (put 'return 'ascii-character 13) |
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
1196 (put 'escape 'ascii-character ?\e) |
5515
920b55d2057b
(vendor-key-syms): Set this variable.
Richard M. Stallman <rms@gnu.org>
parents:
4314
diff
changeset
|
1197 |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1198 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1199 ;;;; Keysyms |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1200 |
11821
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1201 (defun vendor-specific-keysyms (vendor) |
50075
cfb7d0684cf8
(vendor-specific-keysyms, x-last-selected-text-primary): Doc fixes.
John Paul Wallington <jpw@pobox.com>
parents:
49599
diff
changeset
|
1202 "Return the appropriate value of `system-key-alist' for VENDOR. |
11821
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1203 VENDOR is a string containing the name of the X Server's vendor, |
50075
cfb7d0684cf8
(vendor-specific-keysyms, x-last-selected-text-primary): Doc fixes.
John Paul Wallington <jpw@pobox.com>
parents:
49599
diff
changeset
|
1204 as returned by `x-server-vendor'." |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1205 ;; Fixme: Drop Apollo now? |
11821
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1206 (cond ((string-equal vendor "Apollo Computer Inc.") |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1207 '((65280 . linedel) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1208 (65281 . chardel) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1209 (65282 . copy) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1210 (65283 . cut) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1211 (65284 . paste) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1212 (65285 . move) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1213 (65286 . grow) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1214 (65287 . cmd) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1215 (65288 . shell) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1216 (65289 . leftbar) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1217 (65290 . rightbar) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1218 (65291 . leftbox) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1219 (65292 . rightbox) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1220 (65293 . upbox) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1221 (65294 . downbox) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1222 (65295 . pop) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1223 (65296 . read) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1224 (65297 . edit) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1225 (65298 . save) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1226 (65299 . exit) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1227 (65300 . repeat))) |
11902
fab32f80adf5
(vendor-specific-keysyms): Add second spelling for HP.
Karl Heuer <kwzh@gnu.org>
parents:
11821
diff
changeset
|
1228 ((or (string-equal vendor "Hewlett-Packard Incorporated") |
fab32f80adf5
(vendor-specific-keysyms): Add second spelling for HP.
Karl Heuer <kwzh@gnu.org>
parents:
11821
diff
changeset
|
1229 (string-equal vendor "Hewlett-Packard Company")) |
11821
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1230 '(( 168 . mute-acute) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1231 ( 169 . mute-grave) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1232 ( 170 . mute-asciicircum) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1233 ( 171 . mute-diaeresis) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1234 ( 172 . mute-asciitilde) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1235 ( 175 . lira) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1236 ( 190 . guilder) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1237 ( 252 . block) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1238 ( 256 . longminus) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1239 (65388 . reset) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1240 (65389 . system) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1241 (65390 . user) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1242 (65391 . clearline) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1243 (65392 . insertline) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1244 (65393 . deleteline) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1245 (65394 . insertchar) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1246 (65395 . deletechar) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1247 (65396 . backtab) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1248 (65397 . kp-backtab))) |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1249 ;; Fixme: What about non-X11/NeWS sun server? |
12057
562d3062b82e
(vendor-specific-keysyms): Recognize "X Consortium".
Karl Heuer <kwzh@gnu.org>
parents:
11902
diff
changeset
|
1250 ((or (string-equal vendor "X11/NeWS - Sun Microsystems Inc.") |
562d3062b82e
(vendor-specific-keysyms): Recognize "X Consortium".
Karl Heuer <kwzh@gnu.org>
parents:
11902
diff
changeset
|
1251 (string-equal vendor "X Consortium")) |
12556 | 1252 '((392976 . f36) |
1253 (392977 . f37) | |
11821
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1254 (393056 . req) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1255 ;; These are for Sun under X11R6 |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1256 (393072 . props) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1257 (393073 . front) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1258 (393074 . copy) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1259 (393075 . open) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1260 (393076 . paste) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1261 (393077 . cut))) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1262 (t |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1263 ;; This is used by DEC's X server. |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1264 '((65280 . remove))))) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
1265 |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1266 (let ((i 160)) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1267 (while (< i 256) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1268 (puthash i (make-char 'latin-iso8859-1 i) x-keysym-table) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1269 (setq i (1+ i)))) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1270 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1271 ;; Table from Kuhn's proposed additions to the `KEYSYM Encoding' |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1272 ;; appendix to the X protocol definition. |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1273 (dolist |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1274 (pair |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1275 '( |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1276 ;; Latin-2 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1277 (#x1a1 . ?,B!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1278 (#x1a2 . ?,B"(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1279 (#x1a3 . ?,B#(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1280 (#x1a5 . ?,B%(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1281 (#x1a6 . ?,B&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1282 (#x1a9 . ?,B)(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1283 (#x1aa . ?,B*(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1284 (#x1ab . ?,B+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1285 (#x1ac . ?,B,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1286 (#x1ae . ?,B.(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1287 (#x1af . ?,B/(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1288 (#x1b1 . ?,B1(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1289 (#x1b2 . ?,B2(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1290 (#x1b3 . ?,B3(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1291 (#x1b5 . ?,B5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1292 (#x1b6 . ?,B6(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1293 (#x1b7 . ?,B7(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1294 (#x1b9 . ?,B9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1295 (#x1ba . ?,B:(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1296 (#x1bb . ?,B;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1297 (#x1bc . ?,B<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1298 (#x1bd . ?,B=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1299 (#x1be . ?,B>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1300 (#x1bf . ?,B?(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1301 (#x1c0 . ?,B@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1302 (#x1c3 . ?,BC(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1303 (#x1c5 . ?,BE(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1304 (#x1c6 . ?,BF(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1305 (#x1c8 . ?,BH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1306 (#x1ca . ?,BJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1307 (#x1cc . ?,BL(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1308 (#x1cf . ?,BO(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1309 (#x1d0 . ?,BP(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1310 (#x1d1 . ?,BQ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1311 (#x1d2 . ?,BR(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1312 (#x1d5 . ?,BU(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1313 (#x1d8 . ?,BX(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1314 (#x1d9 . ?,BY(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1315 (#x1db . ?,B[(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1316 (#x1de . ?,B^(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1317 (#x1e0 . ?,B`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1318 (#x1e3 . ?,Bc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1319 (#x1e5 . ?,Be(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1320 (#x1e6 . ?,Bf(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1321 (#x1e8 . ?,Bh(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1322 (#x1ea . ?,Bj(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1323 (#x1ec . ?,Bl(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1324 (#x1ef . ?,Bo(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1325 (#x1f0 . ?,Bp(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1326 (#x1f1 . ?,Bq(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1327 (#x1f2 . ?,Br(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1328 (#x1f5 . ?,Bu(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1329 (#x1f8 . ?,Bx(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1330 (#x1f9 . ?,By(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1331 (#x1fb . ?,B{(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1332 (#x1fe . ?,B~(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1333 (#x1ff . ?,B(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1334 ;; Latin-3 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1335 (#x2a1 . ?,C!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1336 (#x2a6 . ?,C&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1337 (#x2a9 . ?,C)(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1338 (#x2ab . ?,C+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1339 (#x2ac . ?,C,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1340 (#x2b1 . ?,C1(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1341 (#x2b6 . ?,C6(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1342 (#x2b9 . ?,C9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1343 (#x2bb . ?,C;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1344 (#x2bc . ?,C<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1345 (#x2c5 . ?,CE(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1346 (#x2c6 . ?,CF(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1347 (#x2d5 . ?,CU(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1348 (#x2d8 . ?,CX(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1349 (#x2dd . ?,C](B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1350 (#x2de . ?,C^(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1351 (#x2e5 . ?,Ce(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1352 (#x2e6 . ?,Cf(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1353 (#x2f5 . ?,Cu(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1354 (#x2f8 . ?,Cx(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1355 (#x2fd . ?,C}(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1356 (#x2fe . ?,C~(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1357 ;; Latin-4 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1358 (#x3a2 . ?,D"(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1359 (#x3a3 . ?,D#(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1360 (#x3a5 . ?,D%(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1361 (#x3a6 . ?,D&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1362 (#x3aa . ?,D*(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1363 (#x3ab . ?,D+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1364 (#x3ac . ?,D,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1365 (#x3b3 . ?,D3(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1366 (#x3b5 . ?,D5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1367 (#x3b6 . ?,D6(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1368 (#x3ba . ?,D:(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1369 (#x3bb . ?,D;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1370 (#x3bc . ?,D<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1371 (#x3bd . ?,D=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1372 (#x3bf . ?,D?(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1373 (#x3c0 . ?,D@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1374 (#x3c7 . ?,DG(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1375 (#x3cc . ?,DL(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1376 (#x3cf . ?,DO(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1377 (#x3d1 . ?,DQ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1378 (#x3d2 . ?,DR(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1379 (#x3d3 . ?,DS(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1380 (#x3d9 . ?,DY(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1381 (#x3dd . ?,D](B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1382 (#x3de . ?,D^(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1383 (#x3e0 . ?,D`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1384 (#x3e7 . ?,Dg(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1385 (#x3ec . ?,Dl(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1386 (#x3ef . ?,Do(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1387 (#x3f1 . ?,Dq(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1388 (#x3f2 . ?,Dr(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1389 (#x3f3 . ?,Ds(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1390 (#x3f9 . ?,Dy(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1391 (#x3fd . ?,D}(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1392 (#x3fe . ?,D~(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1393 ;; Kana: Fixme: needs conversion to Japanese charset -- seems |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1394 ;; to require jisx0213, for which the Unicode translation |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1395 ;; isn't clear. |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1396 (#x47e . ?$,1s>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1397 (#x4a1 . ?$,2=B(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1398 (#x4a2 . ?\$,2=L(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1399 (#x4a3 . ?\$,2=M(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1400 (#x4a4 . ?$,2=A(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1401 (#x4a5 . ?$,2?{(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1402 (#x4a6 . ?$,2?r(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1403 (#x4a7 . ?$,2?!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1404 (#x4a8 . ?$,2?#(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1405 (#x4a9 . ?$,2?%(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1406 (#x4aa . ?$,2?'(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1407 (#x4ab . ?$,2?)(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1408 (#x4ac . ?$,2?c(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1409 (#x4ad . ?$,2?e(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1410 (#x4ae . ?$,2?g(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1411 (#x4af . ?$,2?C(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1412 (#x4b0 . ?$,2?|(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1413 (#x4b1 . ?$,2?"(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1414 (#x4b2 . ?$,2?$(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1415 (#x4b3 . ?$,2?&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1416 (#x4b4 . ?$,2?((B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1417 (#x4b5 . ?$,2?*(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1418 (#x4b6 . ?$,2?+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1419 (#x4b7 . ?$,2?-(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1420 (#x4b8 . ?$,2?/(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1421 (#x4b9 . ?$,2?1(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1422 (#x4ba . ?$,2?3(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1423 (#x4bb . ?$,2?5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1424 (#x4bc . ?$,2?7(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1425 (#x4bd . ?$,2?9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1426 (#x4be . ?$,2?;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1427 (#x4bf . ?$,2?=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1428 (#x4c0 . ?$,2??(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1429 (#x4c1 . ?$,2?A(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1430 (#x4c2 . ?$,2?D(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1431 (#x4c3 . ?$,2?F(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1432 (#x4c4 . ?$,2?H(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1433 (#x4c5 . ?$,2?J(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1434 (#x4c6 . ?$,2?K(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1435 (#x4c7 . ?$,2?L(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1436 (#x4c8 . ?$,2?M(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1437 (#x4c9 . ?$,2?N(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1438 (#x4ca . ?$,2?O(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1439 (#x4cb . ?$,2?R(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1440 (#x4cc . ?$,2?U(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1441 (#x4cd . ?$,2?X(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1442 (#x4ce . ?$,2?[(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1443 (#x4cf . ?$,2?^(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1444 (#x4d0 . ?$,2?_(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1445 (#x4d1 . ?$,2?`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1446 (#x4d2 . ?$,2?a(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1447 (#x4d3 . ?$,2?b(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1448 (#x4d4 . ?$,2?d(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1449 (#x4d5 . ?$,2?f(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1450 (#x4d6 . ?$,2?h(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1451 (#x4d7 . ?$,2?i(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1452 (#x4d8 . ?$,2?j(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1453 (#x4d9 . ?$,2?k(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1454 (#x4da . ?$,2?l(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1455 (#x4db . ?$,2?m(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1456 (#x4dc . ?$,2?o(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1457 (#x4dd . ?$,2?s(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1458 (#x4de . ?$,2>{(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1459 (#x4df . ?$,2>|(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1460 ;; Arabic |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1461 (#x5ac . ?,G,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1462 (#x5bb . ?,G;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1463 (#x5bf . ?,G?(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1464 (#x5c1 . ?,GA(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1465 (#x5c2 . ?,GB(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1466 (#x5c3 . ?,GC(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1467 (#x5c4 . ?,GD(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1468 (#x5c5 . ?,GE(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1469 (#x5c6 . ?,GF(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1470 (#x5c7 . ?,GG(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1471 (#x5c8 . ?,GH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1472 (#x5c9 . ?,GI(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1473 (#x5ca . ?,GJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1474 (#x5cb . ?,GK(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1475 (#x5cc . ?,GL(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1476 (#x5cd . ?,GM(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1477 (#x5ce . ?,GN(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1478 (#x5cf . ?,GO(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1479 (#x5d0 . ?,GP(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1480 (#x5d1 . ?,GQ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1481 (#x5d2 . ?,GR(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1482 (#x5d3 . ?,GS(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1483 (#x5d4 . ?,GT(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1484 (#x5d5 . ?,GU(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1485 (#x5d6 . ?,GV(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1486 (#x5d7 . ?,GW(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1487 (#x5d8 . ?,GX(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1488 (#x5d9 . ?,GY(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1489 (#x5da . ?,GZ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1490 (#x5e0 . ?,G`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1491 (#x5e1 . ?,Ga(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1492 (#x5e2 . ?,Gb(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1493 (#x5e3 . ?,Gc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1494 (#x5e4 . ?,Gd(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1495 (#x5e5 . ?,Ge(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1496 (#x5e6 . ?,Gf(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1497 (#x5e7 . ?,Gg(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1498 (#x5e8 . ?,Gh(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1499 (#x5e9 . ?,Gi(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1500 (#x5ea . ?,Gj(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1501 (#x5eb . ?,Gk(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1502 (#x5ec . ?,Gl(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1503 (#x5ed . ?,Gm(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1504 (#x5ee . ?,Gn(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1505 (#x5ef . ?,Go(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1506 (#x5f0 . ?,Gp(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1507 (#x5f1 . ?,Gq(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1508 (#x5f2 . ?,Gr(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1509 ;; Cyrillic |
66389
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1510 (#x680 . ?$,1)R(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1511 (#x681 . ?$,1)V(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1512 (#x682 . ?$,1)Z(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1513 (#x683 . ?$,1)\(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1514 (#x684 . ?$,1)b(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1515 (#x685 . ?$,1)n(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1516 (#x686 . ?$,1)p(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1517 (#x687 . ?$,1)r(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1518 (#x688 . ?$,1)v(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1519 (#x689 . ?$,1)x(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1520 (#x68a . ?$,1)z(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1521 (#x68c . ?$,1*8(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1522 (#x68d . ?$,1*B(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1523 (#x68e . ?$,1*H(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1524 (#x68f . ?$,1*N(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1525 (#x690 . ?$,1)S(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1526 (#x691 . ?$,1)W(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1527 (#x692 . ?$,1)[(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1528 (#x693 . ?$,1)](B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1529 (#x694 . ?$,1)c(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1530 (#x695 . ?$,1)o(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1531 (#x696 . ?$,1)q(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1532 (#x697 . ?$,1)s(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1533 (#x698 . ?$,1)w(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1534 (#x699 . ?$,1)y(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1535 (#x69a . ?$,1){(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1536 (#x69c . ?$,1*9(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1537 (#x69d . ?$,1*C(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1538 (#x69e . ?$,1*I(B) |
58043855503e
Register more Cyrillic characters in x-keysym-table.
Kenichi Handa <handa@m17n.org>
parents:
65941
diff
changeset
|
1539 (#x69f . ?$,1*O(B) |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1540 (#x6a1 . ?,Lr(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1541 (#x6a2 . ?,Ls(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1542 (#x6a3 . ?,Lq(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1543 (#x6a4 . ?,Lt(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1544 (#x6a5 . ?,Lu(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1545 (#x6a6 . ?,Lv(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1546 (#x6a7 . ?,Lw(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1547 (#x6a8 . ?,Lx(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1548 (#x6a9 . ?,Ly(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1549 (#x6aa . ?,Lz(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1550 (#x6ab . ?,L{(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1551 (#x6ac . ?,L|(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1552 (#x6ae . ?,L~(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1553 (#x6af . ?,L(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1554 (#x6b0 . ?,Lp(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1555 (#x6b1 . ?,L"(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1556 (#x6b2 . ?,L#(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1557 (#x6b3 . ?,L!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1558 (#x6b4 . ?,L$(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1559 (#x6b5 . ?,L%(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1560 (#x6b6 . ?,L&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1561 (#x6b7 . ?,L'(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1562 (#x6b8 . ?,L((B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1563 (#x6b9 . ?,L)(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1564 (#x6ba . ?,L*(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1565 (#x6bb . ?,L+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1566 (#x6bc . ?,L,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1567 (#x6be . ?,L.(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1568 (#x6bf . ?,L/(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1569 (#x6c0 . ?,Ln(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1570 (#x6c1 . ?,LP(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1571 (#x6c2 . ?,LQ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1572 (#x6c3 . ?,Lf(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1573 (#x6c4 . ?,LT(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1574 (#x6c5 . ?,LU(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1575 (#x6c6 . ?,Ld(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1576 (#x6c7 . ?,LS(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1577 (#x6c8 . ?,Le(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1578 (#x6c9 . ?,LX(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1579 (#x6ca . ?,LY(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1580 (#x6cb . ?,LZ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1581 (#x6cc . ?,L[(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1582 (#x6cd . ?,L\(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1583 (#x6ce . ?,L](B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1584 (#x6cf . ?,L^(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1585 (#x6d0 . ?,L_(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1586 (#x6d1 . ?,Lo(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1587 (#x6d2 . ?,L`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1588 (#x6d3 . ?,La(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1589 (#x6d4 . ?,Lb(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1590 (#x6d5 . ?,Lc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1591 (#x6d6 . ?,LV(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1592 (#x6d7 . ?,LR(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1593 (#x6d8 . ?,Ll(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1594 (#x6d9 . ?,Lk(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1595 (#x6da . ?,LW(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1596 (#x6db . ?,Lh(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1597 (#x6dc . ?,Lm(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1598 (#x6dd . ?,Li(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1599 (#x6de . ?,Lg(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1600 (#x6df . ?,Lj(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1601 (#x6e0 . ?,LN(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1602 (#x6e1 . ?,L0(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1603 (#x6e2 . ?,L1(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1604 (#x6e3 . ?,LF(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1605 (#x6e4 . ?,L4(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1606 (#x6e5 . ?,L5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1607 (#x6e6 . ?,LD(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1608 (#x6e7 . ?,L3(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1609 (#x6e8 . ?,LE(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1610 (#x6e9 . ?,L8(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1611 (#x6ea . ?,L9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1612 (#x6eb . ?,L:(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1613 (#x6ec . ?,L;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1614 (#x6ed . ?,L<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1615 (#x6ee . ?,L=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1616 (#x6ef . ?,L>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1617 (#x6f0 . ?,L?(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1618 (#x6f1 . ?,LO(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1619 (#x6f2 . ?,L@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1620 (#x6f3 . ?,LA(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1621 (#x6f4 . ?,LB(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1622 (#x6f5 . ?,LC(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1623 (#x6f6 . ?,L6(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1624 (#x6f7 . ?,L2(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1625 (#x6f8 . ?,LL(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1626 (#x6f9 . ?,LK(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1627 (#x6fa . ?,L7(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1628 (#x6fb . ?,LH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1629 (#x6fc . ?,LM(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1630 (#x6fd . ?,LI(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1631 (#x6fe . ?,LG(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1632 (#x6ff . ?,LJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1633 ;; Greek |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1634 (#x7a1 . ?,F6(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1635 (#x7a2 . ?,F8(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1636 (#x7a3 . ?,F9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1637 (#x7a4 . ?,F:(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1638 (#x7a5 . ?,FZ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1639 (#x7a7 . ?,F<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1640 (#x7a8 . ?,F>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1641 (#x7a9 . ?,F[(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1642 (#x7ab . ?,F?(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1643 (#x7ae . ?,F5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1644 (#x7af . ?,F/(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1645 (#x7b1 . ?,F\(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1646 (#x7b2 . ?,F](B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1647 (#x7b3 . ?,F^(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1648 (#x7b4 . ?,F_(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1649 (#x7b5 . ?,Fz(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1650 (#x7b6 . ?,F@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1651 (#x7b7 . ?,F|(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1652 (#x7b8 . ?,F}(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1653 (#x7b9 . ?,F{(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1654 (#x7ba . ?,F`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1655 (#x7bb . ?,F~(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1656 (#x7c1 . ?,FA(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1657 (#x7c2 . ?,FB(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1658 (#x7c3 . ?,FC(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1659 (#x7c4 . ?,FD(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1660 (#x7c5 . ?,FE(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1661 (#x7c6 . ?,FF(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1662 (#x7c7 . ?,FG(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1663 (#x7c8 . ?,FH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1664 (#x7c9 . ?,FI(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1665 (#x7ca . ?,FJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1666 (#x7cb . ?,FK(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1667 (#x7cc . ?,FL(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1668 (#x7cd . ?,FM(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1669 (#x7ce . ?,FN(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1670 (#x7cf . ?,FO(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1671 (#x7d0 . ?,FP(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1672 (#x7d1 . ?,FQ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1673 (#x7d2 . ?,FS(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1674 (#x7d4 . ?,FT(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1675 (#x7d5 . ?,FU(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1676 (#x7d6 . ?,FV(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1677 (#x7d7 . ?,FW(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1678 (#x7d8 . ?,FX(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1679 (#x7d9 . ?,FY(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1680 (#x7e1 . ?,Fa(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1681 (#x7e2 . ?,Fb(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1682 (#x7e3 . ?,Fc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1683 (#x7e4 . ?,Fd(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1684 (#x7e5 . ?,Fe(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1685 (#x7e6 . ?,Ff(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1686 (#x7e7 . ?,Fg(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1687 (#x7e8 . ?,Fh(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1688 (#x7e9 . ?,Fi(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1689 (#x7ea . ?,Fj(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1690 (#x7eb . ?,Fk(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1691 (#x7ec . ?,Fl(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1692 (#x7ed . ?,Fm(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1693 (#x7ee . ?,Fn(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1694 (#x7ef . ?,Fo(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1695 (#x7f0 . ?,Fp(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1696 (#x7f1 . ?,Fq(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1697 (#x7f2 . ?,Fs(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1698 (#x7f3 . ?,Fr(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1699 (#x7f4 . ?,Ft(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1700 (#x7f5 . ?,Fu(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1701 (#x7f6 . ?,Fv(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1702 (#x7f7 . ?,Fw(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1703 (#x7f8 . ?,Fx(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1704 (#x7f9 . ?,Fy(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1705 ;; Technical |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1706 (#x8a1 . ?$,1|W(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1707 (#x8a2 . ?$,2 ,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1708 (#x8a3 . ?$,2 (B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1709 (#x8a4 . ?$,1{ (B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1710 (#x8a5 . ?$,1{!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1711 (#x8a6 . ?$,2 "(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1712 (#x8a7 . ?$,1|A(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1713 (#x8a8 . ?$,1|C(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1714 (#x8a9 . ?$,1|D(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1715 (#x8aa . ?$,1|F(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1716 (#x8ab . ?$,1|;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1717 (#x8ac . ?$,1|=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1718 (#x8ad . ?$,1|>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1719 (#x8ae . ?$,1|@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1720 (#x8af . ?$,1|H(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1721 (#x8b0 . ?$,1|L(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1722 (#x8bc . ?$,1y$(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1723 (#x8bd . ?$,1y (B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1724 (#x8be . ?$,1y%(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1725 (#x8bf . ?$,1xK(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1726 (#x8c0 . ?$,1xT(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1727 (#x8c1 . ?$,1x=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1728 (#x8c2 . ?$,1x>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1729 (#x8c5 . ?$,1x'(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1730 (#x8c8 . ?$,1x\(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1731 (#x8c9 . ?$,1xc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1732 (#x8cd . ?$,1wT(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1733 (#x8ce . ?$,1wR(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1734 (#x8cf . ?$,1y!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1735 (#x8d6 . ?$,1x:(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1736 (#x8da . ?$,1yB(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1737 (#x8db . ?$,1yC(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1738 (#x8dc . ?$,1xI(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1739 (#x8dd . ?$,1xJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1740 (#x8de . ?$,1xG(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1741 (#x8df . ?$,1xH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1742 (#x8ef . ?$,1x"(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1743 (#x8f6 . ?$,1!R(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1744 (#x8fb . ?$,1vp(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1745 (#x8fc . ?$,1vq(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1746 (#x8fd . ?$,1vr(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1747 (#x8fe . ?$,1vs(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1748 ;; Special |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1749 (#x9e0 . ?$,2"&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1750 (#x9e1 . ?$,2!R(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1751 (#x9e2 . ?$,1}I(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1752 (#x9e3 . ?$,1}L(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1753 (#x9e4 . ?$,1}M(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1754 (#x9e5 . ?$,1}J(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1755 (#x9e8 . ?$,1}d(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1756 (#x9e9 . ?$,1}K(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1757 (#x9ea . ?$,2 8(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1758 (#x9eb . ?$,2 0(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1759 (#x9ec . ?$,2 ,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1760 (#x9ed . ?$,2 4(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1761 (#x9ee . ?$,2 \(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1762 (#x9ef . ?$,1|Z(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1763 (#x9f0 . ?$,1|[(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1764 (#x9f1 . ?$,2 (B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1765 (#x9f2 . ?$,1|\(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1766 (#x9f3 . ?$,1|](B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1767 (#x9f4 . ?$,2 <(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1768 (#x9f5 . ?$,2 D(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1769 (#x9f6 . ?$,2 T(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1770 (#x9f7 . ?$,2 L(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1771 (#x9f8 . ?$,2 "(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1772 ;; Publishing |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1773 (#xaa1 . ?$,1rc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1774 (#xaa2 . ?$,1rb(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1775 (#xaa3 . ?$,1rd(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1776 (#xaa4 . ?$,1re(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1777 (#xaa5 . ?$,1rg(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1778 (#xaa6 . ?$,1rh(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1779 (#xaa7 . ?$,1ri(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1780 (#xaa8 . ?$,1rj(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1781 (#xaa9 . ?$,1rt(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1782 (#xaaa . ?$,1rs(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1783 (#xaae . ?$,1s&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1784 (#xaaf . ?$,1s%(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1785 (#xab0 . ?$,1v3(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1786 (#xab1 . ?$,1v4(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1787 (#xab2 . ?$,1v5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1788 (#xab3 . ?$,1v6(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1789 (#xab4 . ?$,1v7(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1790 (#xab5 . ?$,1v8(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1791 (#xab6 . ?$,1v9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1792 (#xab7 . ?$,1v:(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1793 (#xab8 . ?$,1uE(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1794 (#xabb . ?$,1rr(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1795 (#xabc . ?$,1{)(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1796 (#xabe . ?$,1{*(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1797 (#xac3 . ?$,1v;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1798 (#xac4 . ?$,1v<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1799 (#xac5 . ?$,1v=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1800 (#xac6 . ?$,1v>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1801 (#xac9 . ?$,1ub(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1802 (#xaca . ?$,2"s(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1803 (#xacc . ?$,2"!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1804 (#xacd . ?$,2!w(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1805 (#xace . ?$,2"+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1806 (#xacf . ?$,2!o(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1807 (#xad0 . ?$,1rx(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1808 (#xad1 . ?$,1ry(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1809 (#xad2 . ?$,1r|(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1810 (#xad3 . ?$,1r}(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1811 (#xad4 . ?$,1u^(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1812 (#xad6 . ?$,1s2(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1813 (#xad7 . ?$,1s3(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1814 (#xad9 . ?$,2%](B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1815 (#xadb . ?$,2!l(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1816 (#xadc . ?$,2" (B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1817 (#xadd . ?$,2!v(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1818 (#xade . ?$,2"/(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1819 (#xadf . ?$,2!n(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1820 (#xae0 . ?$,2"F(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1821 (#xae1 . ?$,2!k(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1822 (#xae2 . ?$,2!m(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1823 (#xae3 . ?$,2!s(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1824 (#xae4 . ?$,2!}(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1825 (#xae5 . ?$,2"f(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1826 (#xae6 . ?$,1s"(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1827 (#xae7 . ?$,2!j(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1828 (#xae8 . ?$,2!r(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1829 (#xae9 . ?$,2!|(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1830 (#xaea . ?$,2"|(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1831 (#xaeb . ?$,2"~(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1832 (#xaec . ?$,2#c(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1833 (#xaed . ?$,2#f(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1834 (#xaee . ?$,2#e(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1835 (#xaf0 . ?$,2%`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1836 (#xaf1 . ?$,1s (B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1837 (#xaf2 . ?$,1s!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1838 (#xaf3 . ?$,2%S(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1839 (#xaf4 . ?$,2%W(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1840 (#xaf5 . ?$,2#o(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1841 (#xaf6 . ?$,2#m(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1842 (#xaf7 . ?$,2#B(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1843 (#xaf8 . ?$,2#@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1844 (#xaf9 . ?$,2"n(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1845 (#xafa . ?$,1zu(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1846 (#xafb . ?$,1uW(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1847 (#xafc . ?$,1s8(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1848 (#xafd . ?$,1rz(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1849 (#xafe . ?$,1r~(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1850 ;; APL |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1851 (#xba3 . ?<) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1852 (#xba6 . ?>) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1853 (#xba8 . ?$,1xH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1854 (#xba9 . ?$,1xG(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1855 (#xbc0 . ?,A/(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1856 (#xbc2 . ?$,1ye(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1857 (#xbc3 . ?$,1xI(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1858 (#xbc4 . ?$,1zj(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1859 (#xbc6 . ?_) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1860 (#xbca . ?$,1x8(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1861 (#xbcc . ?$,1|5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1862 (#xbce . ?$,1yd(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1863 (#xbcf . ?$,2"+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1864 (#xbd3 . ?$,1zh(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1865 (#xbd6 . ?$,1xJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1866 (#xbd8 . ?$,1yC(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1867 (#xbda . ?$,1yB(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1868 (#xbdc . ?$,1yb(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1869 (#xbfc . ?$,1yc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1870 ;; Hebrew |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1871 (#xcdf . ?,H_(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1872 (#xce0 . ?,H`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1873 (#xce1 . ?,Ha(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1874 (#xce2 . ?,Hb(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1875 (#xce3 . ?,Hc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1876 (#xce4 . ?,Hd(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1877 (#xce5 . ?,He(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1878 (#xce6 . ?,Hf(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1879 (#xce7 . ?,Hg(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1880 (#xce8 . ?,Hh(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1881 (#xce9 . ?,Hi(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1882 (#xcea . ?,Hj(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1883 (#xceb . ?,Hk(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1884 (#xcec . ?,Hl(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1885 (#xced . ?,Hm(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1886 (#xcee . ?,Hn(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1887 (#xcef . ?,Ho(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1888 (#xcf0 . ?,Hp(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1889 (#xcf1 . ?,Hq(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1890 (#xcf2 . ?,Hr(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1891 (#xcf3 . ?,Hs(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1892 (#xcf4 . ?,Ht(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1893 (#xcf5 . ?,Hu(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1894 (#xcf6 . ?,Hv(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1895 (#xcf7 . ?,Hw(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1896 (#xcf8 . ?,Hx(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1897 (#xcf9 . ?,Hy(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1898 (#xcfa . ?,Hz(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1899 ;; Thai |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1900 (#xda1 . ?,T!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1901 (#xda2 . ?,T"(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1902 (#xda3 . ?,T#(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1903 (#xda4 . ?,T$(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1904 (#xda5 . ?,T%(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1905 (#xda6 . ?,T&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1906 (#xda7 . ?,T'(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1907 (#xda8 . ?,T((B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1908 (#xda9 . ?,T)(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1909 (#xdaa . ?,T*(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1910 (#xdab . ?,T+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1911 (#xdac . ?,T,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1912 (#xdad . ?,T-(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1913 (#xdae . ?,T.(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1914 (#xdaf . ?,T/(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1915 (#xdb0 . ?,T0(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1916 (#xdb1 . ?,T1(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1917 (#xdb2 . ?,T2(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1918 (#xdb3 . ?,T3(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1919 (#xdb4 . ?,T4(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1920 (#xdb5 . ?,T5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1921 (#xdb6 . ?,T6(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1922 (#xdb7 . ?,T7(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1923 (#xdb8 . ?,T8(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1924 (#xdb9 . ?,T9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1925 (#xdba . ?,T:(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1926 (#xdbb . ?,T;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1927 (#xdbc . ?,T<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1928 (#xdbd . ?,T=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1929 (#xdbe . ?,T>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1930 (#xdbf . ?,T?(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1931 (#xdc0 . ?,T@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1932 (#xdc1 . ?,TA(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1933 (#xdc2 . ?,TB(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1934 (#xdc3 . ?,TC(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1935 (#xdc4 . ?,TD(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1936 (#xdc5 . ?,TE(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1937 (#xdc6 . ?,TF(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1938 (#xdc7 . ?,TG(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1939 (#xdc8 . ?,TH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1940 (#xdc9 . ?,TI(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1941 (#xdca . ?,TJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1942 (#xdcb . ?,TK(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1943 (#xdcc . ?,TL(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1944 (#xdcd . ?,TM(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1945 (#xdce . ?,TN(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1946 (#xdcf . ?,TO(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1947 (#xdd0 . ?,TP(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1948 (#xdd1 . ?,TQ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1949 (#xdd2 . ?,TR(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1950 (#xdd3 . ?,TS(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1951 (#xdd4 . ?,TT(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1952 (#xdd5 . ?,TU(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1953 (#xdd6 . ?,TV(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1954 (#xdd7 . ?,TW(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1955 (#xdd8 . ?,TX(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1956 (#xdd9 . ?,TY(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1957 (#xdda . ?,TZ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1958 (#xddf . ?,T_(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1959 (#xde0 . ?,T`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1960 (#xde1 . ?,Ta(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1961 (#xde2 . ?,Tb(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1962 (#xde3 . ?,Tc(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1963 (#xde4 . ?,Td(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1964 (#xde5 . ?,Te(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1965 (#xde6 . ?,Tf(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1966 (#xde7 . ?,Tg(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1967 (#xde8 . ?,Th(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1968 (#xde9 . ?,Ti(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1969 (#xdea . ?,Tj(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1970 (#xdeb . ?,Tk(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1971 (#xdec . ?,Tl(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1972 (#xded . ?,Tm(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1973 (#xdf0 . ?,Tp(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1974 (#xdf1 . ?,Tq(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1975 (#xdf2 . ?,Tr(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1976 (#xdf3 . ?,Ts(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1977 (#xdf4 . ?,Tt(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1978 (#xdf5 . ?,Tu(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1979 (#xdf6 . ?,Tv(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1980 (#xdf7 . ?,Tw(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1981 (#xdf8 . ?,Tx(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1982 (#xdf9 . ?,Ty(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1983 ;; Korean |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1984 (#xea1 . ?$(C$!(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1985 (#xea2 . ?$(C$"(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1986 (#xea3 . ?$(C$#(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1987 (#xea4 . ?$(C$$(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1988 (#xea5 . ?$(C$%(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1989 (#xea6 . ?$(C$&(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1990 (#xea7 . ?$(C$'(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1991 (#xea8 . ?$(C$((B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1992 (#xea9 . ?$(C$)(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1993 (#xeaa . ?$(C$*(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1994 (#xeab . ?$(C$+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1995 (#xeac . ?$(C$,(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1996 (#xead . ?$(C$-(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1997 (#xeae . ?$(C$.(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1998 (#xeaf . ?$(C$/(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
1999 (#xeb0 . ?$(C$0(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2000 (#xeb1 . ?$(C$1(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2001 (#xeb2 . ?$(C$2(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2002 (#xeb3 . ?$(C$3(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2003 (#xeb4 . ?$(C$4(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2004 (#xeb5 . ?$(C$5(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2005 (#xeb6 . ?$(C$6(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2006 (#xeb7 . ?$(C$7(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2007 (#xeb8 . ?$(C$8(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2008 (#xeb9 . ?$(C$9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2009 (#xeba . ?$(C$:(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2010 (#xebb . ?$(C$;(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2011 (#xebc . ?$(C$<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2012 (#xebd . ?$(C$=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2013 (#xebe . ?$(C$>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2014 (#xebf . ?$(C$?(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2015 (#xec0 . ?$(C$@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2016 (#xec1 . ?$(C$A(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2017 (#xec2 . ?$(C$B(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2018 (#xec3 . ?$(C$C(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2019 (#xec4 . ?$(C$D(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2020 (#xec5 . ?$(C$E(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2021 (#xec6 . ?$(C$F(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2022 (#xec7 . ?$(C$G(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2023 (#xec8 . ?$(C$H(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2024 (#xec9 . ?$(C$I(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2025 (#xeca . ?$(C$J(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2026 (#xecb . ?$(C$K(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2027 (#xecc . ?$(C$L(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2028 (#xecd . ?$(C$M(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2029 (#xece . ?$(C$N(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2030 (#xecf . ?$(C$O(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2031 (#xed0 . ?$(C$P(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2032 (#xed1 . ?$(C$Q(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2033 (#xed2 . ?$(C$R(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2034 (#xed3 . ?$(C$S(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2035 (#xed4 . ?$,1LH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2036 (#xed5 . ?$,1LI(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2037 (#xed6 . ?$,1LJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2038 (#xed7 . ?$,1LK(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2039 (#xed8 . ?$,1LL(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2040 (#xed9 . ?$,1LM(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2041 (#xeda . ?$,1LN(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2042 (#xedb . ?$,1LO(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2043 (#xedc . ?$,1LP(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2044 (#xedd . ?$,1LQ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2045 (#xede . ?$,1LR(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2046 (#xedf . ?$,1LS(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2047 (#xee0 . ?$,1LT(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2048 (#xee1 . ?$,1LU(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2049 (#xee2 . ?$,1LV(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2050 (#xee3 . ?$,1LW(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2051 (#xee4 . ?$,1LX(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2052 (#xee5 . ?$,1LY(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2053 (#xee6 . ?$,1LZ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2054 (#xee7 . ?$,1L[(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2055 (#xee8 . ?$,1L\(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2056 (#xee9 . ?$,1L](B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2057 (#xeea . ?$,1L^(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2058 (#xeeb . ?$,1L_(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2059 (#xeec . ?$,1L`(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2060 (#xeed . ?$,1La(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2061 (#xeee . ?$,1Lb(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2062 (#xeef . ?$(C$](B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2063 (#xef0 . ?$(C$a(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2064 (#xef1 . ?$(C$h(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2065 (#xef2 . ?$(C$o(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2066 (#xef3 . ?$(C$q(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2067 (#xef4 . ?$(C$t(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2068 (#xef5 . ?$(C$v(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2069 (#xef6 . ?$(C$}(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2070 (#xef7 . ?$(C$~(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2071 (#xef8 . ?$,1M+(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2072 (#xef9 . ?$,1M0(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2073 (#xefa . ?$,1M9(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2074 (#xeff . ?$,1tI(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2075 ;; Latin-5 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2076 ;; Latin-6 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2077 ;; Latin-7 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2078 ;; Latin-8 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2079 ;; Latin-9 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2080 (#x13bc . ?,b<(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2081 (#x13bd . ?,b=(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2082 (#x13be . ?,b>(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2083 ;; Currency |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2084 (#x20a0 . ?$,1t@(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2085 (#x20a1 . ?$,1tA(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2086 (#x20a2 . ?$,1tB(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2087 (#x20a3 . ?$,1tC(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2088 (#x20a4 . ?$,1tD(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2089 (#x20a5 . ?$,1tE(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2090 (#x20a6 . ?$,1tF(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2091 (#x20a7 . ?$,1tG(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2092 (#x20a8 . ?$,1tH(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2093 (#x20aa . ?$,1tJ(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2094 (#x20ab . ?$,1tK(B) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2095 (#x20ac . ?,b$(B))) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2096 (puthash (car pair) (cdr pair) x-keysym-table)) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2097 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2098 ;; The following keysym codes for graphics are listed in the document |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2099 ;; as not having unicodes available: |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2100 |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2101 ;; #x08b1 TOP LEFT SUMMATION Technical |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2102 ;; #x08b2 BOTTOM LEFT SUMMATION Technical |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2103 ;; #x08b3 TOP VERTICAL SUMMATION CONNECTOR Technical |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2104 ;; #x08b4 BOTTOM VERTICAL SUMMATION CONNECTOR Technical |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2105 ;; #x08b5 TOP RIGHT SUMMATION Technical |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2106 ;; #x08b6 BOTTOM RIGHT SUMMATION Technical |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2107 ;; #x08b7 RIGHT MIDDLE SUMMATION Technical |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2108 ;; #x0aac SIGNIFICANT BLANK SYMBOL Publish |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2109 ;; #x0abd DECIMAL POINT Publish |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2110 ;; #x0abf MARKER Publish |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2111 ;; #x0acb TRADEMARK SIGN IN CIRCLE Publish |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2112 ;; #x0ada HEXAGRAM Publish |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2113 ;; #x0aff CURSOR Publish |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2114 ;; #x0dde THAI MAIHANAKAT Thai |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2115 |
54 | 2116 |
1546 | 2117 ;;;; Selections and cut buffers |
707 | 2118 |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2119 ;; We keep track of the last text selected here, so we can check the |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2120 ;; current selection against it, and avoid passing back our own text |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2121 ;; from x-cut-buffer-or-selection-value. We track all three |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2122 ;; seperately in case another X application only sets one of them |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2123 ;; (say the cut buffer) we aren't fooled by the PRIMARY or |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2124 ;; CLIPBOARD selection staying the same. |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2125 (defvar x-last-selected-text-clipboard nil |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2126 "The value of the CLIPBOARD X selection last time we selected or |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2127 pasted text.") |
50075
cfb7d0684cf8
(vendor-specific-keysyms, x-last-selected-text-primary): Doc fixes.
John Paul Wallington <jpw@pobox.com>
parents:
49599
diff
changeset
|
2128 (defvar x-last-selected-text-primary nil |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2129 "The value of the PRIMARY X selection last time we selected or |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2130 pasted text.") |
50075
cfb7d0684cf8
(vendor-specific-keysyms, x-last-selected-text-primary): Doc fixes.
John Paul Wallington <jpw@pobox.com>
parents:
49599
diff
changeset
|
2131 (defvar x-last-selected-text-cut nil |
58695
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2132 "The value of the X cut buffer last time we selected or pasted text. |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2133 The actual text stored in the X cut buffer is what encoded from this value.") |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2134 (defvar x-last-selected-text-cut-encoded nil |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2135 "The value of the X cut buffer last time we selected or pasted text. |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2136 This is the actual text stored in the X cut buffer.") |
727 | 2137 |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2138 (defvar x-cut-buffer-max 20000 ; Note this value is overridden below. |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2139 "Max number of characters to put in the cut buffer. |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2140 It is said that overlarge strings are slow to put into the cut buffer.") |
4236
8e14db210975
(x-select-text): Limit size of text sent to cut buffer.
Richard M. Stallman <rms@gnu.org>
parents:
4132
diff
changeset
|
2141 |
33917
8fdc1e5e72f3
(x-select-enable-clipboard): Customize (per lispref).
Dave Love <fx@gnu.org>
parents:
29555
diff
changeset
|
2142 (defcustom x-select-enable-clipboard nil |
6698
b107e54218fe
(x-select-enable-clipboard): New variable.
Richard M. Stallman <rms@gnu.org>
parents:
6399
diff
changeset
|
2143 "Non-nil means cutting and pasting uses the clipboard. |
33917
8fdc1e5e72f3
(x-select-enable-clipboard): Customize (per lispref).
Dave Love <fx@gnu.org>
parents:
29555
diff
changeset
|
2144 This is in addition to, but in preference to, the primary selection." |
8fdc1e5e72f3
(x-select-enable-clipboard): Customize (per lispref).
Dave Love <fx@gnu.org>
parents:
29555
diff
changeset
|
2145 :type 'boolean |
8fdc1e5e72f3
(x-select-enable-clipboard): Customize (per lispref).
Dave Love <fx@gnu.org>
parents:
29555
diff
changeset
|
2146 :group 'killing) |
6698
b107e54218fe
(x-select-enable-clipboard): New variable.
Richard M. Stallman <rms@gnu.org>
parents:
6399
diff
changeset
|
2147 |
3036
98f500ca5593
(x-select-text): New arg PUSH.
Richard M. Stallman <rms@gnu.org>
parents:
2808
diff
changeset
|
2148 (defun x-select-text (text &optional push) |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2149 "Make TEXT, a string, the primary X selection. |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2150 Also, set the value of X cut buffer 0, for backward compatibility |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2151 with older X applications. |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2152 gildea@stop.mail-abuse.org says it's not desirable to put kills |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2153 in the clipboard." |
4236
8e14db210975
(x-select-text): Limit size of text sent to cut buffer.
Richard M. Stallman <rms@gnu.org>
parents:
4132
diff
changeset
|
2154 ;; Don't send the cut buffer too much text. |
8e14db210975
(x-select-text): Limit size of text sent to cut buffer.
Richard M. Stallman <rms@gnu.org>
parents:
4132
diff
changeset
|
2155 ;; It becomes slow, and if really big it causes errors. |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2156 (cond ((>= (length text) x-cut-buffer-max) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2157 (x-set-cut-buffer "" push) |
58695
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2158 (setq x-last-selected-text-cut "" |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2159 x-last-selected-text-cut-encoded "")) |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
2160 (t |
58695
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2161 (setq x-last-selected-text-cut text |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2162 x-last-selected-text-cut-encoded |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2163 (encode-coding-string text (or locale-coding-system |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2164 'iso-latin-1))) |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2165 (x-set-cut-buffer x-last-selected-text-cut-encoded push))) |
2366
ed9b74c46fb9
* x-win.el: Update copyright to 1993.
Jim Blandy <jimb@redhat.com>
parents:
2157
diff
changeset
|
2166 (x-set-selection 'PRIMARY text) |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2167 (setq x-last-selected-text-primary text) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2168 (when x-select-enable-clipboard |
50114
627c4cc6b42b
(x-select-text): Don't set a text containing
Kenichi Handa <handa@m17n.org>
parents:
50075
diff
changeset
|
2169 (x-set-selection 'CLIPBOARD text) |
627c4cc6b42b
(x-select-text): Don't set a text containing
Kenichi Handa <handa@m17n.org>
parents:
50075
diff
changeset
|
2170 (setq x-last-selected-text-clipboard text)) |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2171 ) |
643 | 2172 |
51601
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2173 (defvar x-select-request-type nil |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2174 "*Data type request for X selection. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2175 The value is nil, one of the following data types, or a list of them: |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2176 `COMPOUND_TEXT', `UTF8_STRING', `STRING', `TEXT' |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2177 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2178 If the value is nil, try `COMPOUND_TEXT' and `UTF8_STRING', and |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2179 use the more appropriate result. If both fail, try `STRING', and |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2180 then `TEXT'. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2181 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2182 If the value is one of the above symbols, try only the specified |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2183 type. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2184 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2185 If the value is a list of them, try each of them in the specified |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2186 order until succeed.") |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2187 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2188 ;; Helper function for x-selection-value. Select UTF8 or CTEXT |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2189 ;; whichever is more appropriate. Here, we use this heurisitcs. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2190 ;; |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2191 ;; (1) If their lengthes are different, select the longer one. This |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2192 ;; is because an X client may just cut off unsupported characters. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2193 ;; |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2194 ;; (2) Otherwise, if the Nth character of CTEXT is an ASCII |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2195 ;; character that is different from the Nth character of UTF8, |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2196 ;; select UTF8. This is because an X client may replace unsupported |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2197 ;; characters with some ASCII character (typically ` ' or `?') in |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2198 ;; CTEXT. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2199 ;; |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2200 ;; (3) Otherwise, select CTEXT. This is because legacy charsets are |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2201 ;; better for the current Emacs, especially when the selection owner |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2202 ;; is also Emacs. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2203 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2204 (defun x-select-utf8-or-ctext (utf8 ctext) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2205 (let ((len-utf8 (length utf8)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2206 (len-ctext (length ctext)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2207 (selected ctext) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2208 (i 0) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2209 char) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2210 (if (/= len-utf8 len-ctext) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2211 (if (> len-utf8 len-ctext) utf8 ctext) |
53906
b8d76d842cb9
(x-select-utf8-or-ctext): Use compare-strings instead of while loop.
Kenichi Handa <handa@m17n.org>
parents:
53789
diff
changeset
|
2212 (let ((result (compare-strings utf8 0 len-utf8 ctext 0 len-ctext))) |
b8d76d842cb9
(x-select-utf8-or-ctext): Use compare-strings instead of while loop.
Kenichi Handa <handa@m17n.org>
parents:
53789
diff
changeset
|
2213 (if (or (eq result t) |
b8d76d842cb9
(x-select-utf8-or-ctext): Use compare-strings instead of while loop.
Kenichi Handa <handa@m17n.org>
parents:
53789
diff
changeset
|
2214 (>= (aref ctext (1- (abs result))) 128)) |
b8d76d842cb9
(x-select-utf8-or-ctext): Use compare-strings instead of while loop.
Kenichi Handa <handa@m17n.org>
parents:
53789
diff
changeset
|
2215 ctext |
b8d76d842cb9
(x-select-utf8-or-ctext): Use compare-strings instead of while loop.
Kenichi Handa <handa@m17n.org>
parents:
53789
diff
changeset
|
2216 utf8))))) |
51601
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2217 |
63191
d9becfcb69a7
(x-clipboard-yank): Remove condition-case
Kenichi Handa <handa@m17n.org>
parents:
63182
diff
changeset
|
2218 ;; Get a selection value of type TYPE by calling x-get-selection with |
d9becfcb69a7
(x-clipboard-yank): Remove condition-case
Kenichi Handa <handa@m17n.org>
parents:
63182
diff
changeset
|
2219 ;; an appropiate DATA-TYPE argument decidd by `x-select-request-type'. |
d9becfcb69a7
(x-clipboard-yank): Remove condition-case
Kenichi Handa <handa@m17n.org>
parents:
63182
diff
changeset
|
2220 ;; The return value is already decoded. If x-get-selection causes an |
d9becfcb69a7
(x-clipboard-yank): Remove condition-case
Kenichi Handa <handa@m17n.org>
parents:
63182
diff
changeset
|
2221 ;; error, this function return nil. |
d9becfcb69a7
(x-clipboard-yank): Remove condition-case
Kenichi Handa <handa@m17n.org>
parents:
63182
diff
changeset
|
2222 |
51601
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2223 (defun x-selection-value (type) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2224 (let (text) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2225 (cond ((null x-select-request-type) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2226 (let (utf8 ctext utf8-coding) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2227 ;; We try both UTF8_STRING and COMPOUND_TEXT, and choose |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2228 ;; the more appropriate one. If both fail, try STRING. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2229 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2230 ;; At first try UTF8_STRING. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2231 (setq utf8 (condition-case nil |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2232 (x-get-selection type 'UTF8_STRING) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2233 (error nil)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2234 utf8-coding last-coding-system-used) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2235 (if utf8 |
53745 | 2236 ;; If it is a local selection, or it contains only |
53744
ac5e37408488
(x-selection-value): Optimize for ASCII only case.
Kenichi Handa <handa@m17n.org>
parents:
53662
diff
changeset
|
2237 ;; ASCII characers, choose it. |
ac5e37408488
(x-selection-value): Optimize for ASCII only case.
Kenichi Handa <handa@m17n.org>
parents:
53662
diff
changeset
|
2238 (if (or (not (get-text-property 0 'foreign-selection utf8)) |
ac5e37408488
(x-selection-value): Optimize for ASCII only case.
Kenichi Handa <handa@m17n.org>
parents:
53662
diff
changeset
|
2239 (= (length utf8) (string-bytes utf8))) |
51601
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2240 (setq text utf8))) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2241 ;; If not yet decided, try COMPOUND_TEXT. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2242 (if (not text) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2243 (if (setq ctext (condition-case nil |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2244 (x-get-selection type 'COMPOUND_TEXT) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2245 (error nil))) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2246 ;; If UTF8_STRING was also successful, choose the |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2247 ;; more appropriate one from UTF8 and CTEXT. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2248 (if utf8 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2249 (setq text (x-select-utf8-or-ctext utf8 ctext)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2250 ;; Othewise, choose CTEXT. |
56674
302e4e1415d3
term/x-win.el (x-selection-value): If utf8 was successful but
Kenichi Handa <handa@m17n.org>
parents:
55343
diff
changeset
|
2251 (setq text ctext)) |
302e4e1415d3
term/x-win.el (x-selection-value): If utf8 was successful but
Kenichi Handa <handa@m17n.org>
parents:
55343
diff
changeset
|
2252 (setq text utf8))) |
51601
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2253 ;; If not yet decided, try STRING. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2254 (or text |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2255 (setq text (condition-case nil |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2256 (x-get-selection type 'STRING) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2257 (error nil)))) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2258 (if (eq text utf8) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2259 (setq last-coding-system-used utf8-coding)))) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2260 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2261 ((consp x-select-request-type) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2262 (let ((tail x-select-request-type)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2263 (while (and tail (not text)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2264 (condition-case nil |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2265 (setq text (x-get-selection type (car tail))) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2266 (error nil)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2267 (setq tail (cdr tail))))) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2268 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2269 (t |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2270 (condition-case nil |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2271 (setq text (x-get-selection type x-select-request-type)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2272 (error nil)))) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2273 |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2274 (if text |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2275 (remove-text-properties 0 (length text) '(foreign-selection nil) text)) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2276 text)) |
64701
34bd8e434dd7
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
2277 |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2278 ;; Return the value of the current X selection. |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2279 ;; Consult the selection, and the cut buffer. Treat empty strings |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2280 ;; as if they were unset. |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2281 ;; If this function is called twice and finds the same text, |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2282 ;; it returns nil the second time. This is so that a single |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2283 ;; selection won't be added to the kill ring over and over. |
707 | 2284 (defun x-cut-buffer-or-selection-value () |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2285 (let (clip-text primary-text cut-text) |
19112
3940bb7f5515
(x-cut-buffer-or-selection-value): Try both
Richard M. Stallman <rms@gnu.org>
parents:
19085
diff
changeset
|
2286 (when x-select-enable-clipboard |
51601
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2287 (setq clip-text (x-selection-value 'CLIPBOARD)) |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2288 (if (string= clip-text "") (setq clip-text nil)) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2289 |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2290 ;; Check the CLIPBOARD selection for 'newness', is it different |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2291 ;; from what we remebered them to be last time we did a |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2292 ;; cut/paste operation. |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
2293 (setq clip-text |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2294 (cond;; check clipboard |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2295 ((or (not clip-text) (string= clip-text "")) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2296 (setq x-last-selected-text-clipboard nil)) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2297 ((eq clip-text x-last-selected-text-clipboard) nil) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2298 ((string= clip-text x-last-selected-text-clipboard) |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
2299 ;; Record the newer string, |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2300 ;; so subsequent calls can use the `eq' test. |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2301 (setq x-last-selected-text-clipboard clip-text) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2302 nil) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2303 (t |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2304 (setq x-last-selected-text-clipboard clip-text)))) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2305 ) |
19112
3940bb7f5515
(x-cut-buffer-or-selection-value): Try both
Richard M. Stallman <rms@gnu.org>
parents:
19085
diff
changeset
|
2306 |
51601
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2307 (setq primary-text (x-selection-value 'PRIMARY)) |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2308 ;; Check the PRIMARY selection for 'newness', is it different |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2309 ;; from what we remebered them to be last time we did a |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2310 ;; cut/paste operation. |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
2311 (setq primary-text |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2312 (cond;; check primary selection |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2313 ((or (not primary-text) (string= primary-text "")) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2314 (setq x-last-selected-text-primary nil)) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2315 ((eq primary-text x-last-selected-text-primary) nil) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2316 ((string= primary-text x-last-selected-text-primary) |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
2317 ;; Record the newer string, |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2318 ;; so subsequent calls can use the `eq' test. |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2319 (setq x-last-selected-text-primary primary-text) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2320 nil) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2321 (t |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2322 (setq x-last-selected-text-primary primary-text)))) |
23903
7d1efca4eadc
(x-cut-buffer-or-selection-value):
Karl Heuer <kwzh@gnu.org>
parents:
23686
diff
changeset
|
2323 |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2324 (setq cut-text (x-get-cut-buffer 0)) |
1266 | 2325 |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2326 ;; Check the x cut buffer for 'newness', is it different |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2327 ;; from what we remebered them to be last time we did a |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2328 ;; cut/paste operation. |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
2329 (setq cut-text |
58695
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2330 (cond;; check cut buffer |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2331 ((or (not cut-text) (string= cut-text "")) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2332 (setq x-last-selected-text-cut nil)) |
58695
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2333 ;; This short cut doesn't work because x-get-cut-buffer |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2334 ;; always returns a newly created string. |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2335 ;; ((eq cut-text x-last-selected-text-cut) nil) |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2336 ((string= cut-text x-last-selected-text-cut-encoded) |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2337 ;; See the comment above. No need of this recording. |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
2338 ;; Record the newer string, |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2339 ;; so subsequent calls can use the `eq' test. |
58695
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2340 ;; (setq x-last-selected-text-cut cut-text) |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2341 nil) |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2342 (t |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2343 (setq x-last-selected-text-cut-encoded cut-text |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2344 x-last-selected-text-cut |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2345 (decode-coding-string cut-text (or locale-coding-system |
b742505dc5c4
(x-last-selected-text-cut-encoded): New variable.
Kenichi Handa <handa@m17n.org>
parents:
56674
diff
changeset
|
2346 'iso-latin-1)))))) |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2347 |
51601
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2348 ;; As we have done one selection, clear this now. |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2349 (setq next-selection-coding-system nil) |
c2c18aa16be3
(x-select-request-type): New variable.
Kenichi Handa <handa@m17n.org>
parents:
51181
diff
changeset
|
2350 |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2351 ;; At this point we have recorded the current values for the |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2352 ;; selection from clipboard (if we are supposed to) primary, |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2353 ;; and cut buffer. So return the first one that has changed |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2354 ;; (which is the first non-null one). |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2355 ;; |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2356 ;; NOTE: There will be cases where more than one of these has |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2357 ;; changed and the new values differ. This indicates that |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2358 ;; something like the following has happened since the last time |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2359 ;; we looked at the selections: Application X set all the |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2360 ;; selections, then Application Y set only one or two of them (say |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2361 ;; just the cut-buffer). In this case since we don't have |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2362 ;; timestamps there is no way to know what the 'correct' value to |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2363 ;; return is. The nice thing to do would be to tell the user we |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2364 ;; saw multiple possible selections and ask the user which was the |
49599
5ade352e8d1c
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49288
diff
changeset
|
2365 ;; one they wanted. |
44807
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2366 ;; This code is still a big improvement because now the user can |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2367 ;; futz with the current selection and get emacs to pay attention |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2368 ;; to the cut buffer again (previously as soon as clipboard or |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2369 ;; primary had been set the cut buffer would essentially never be |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2370 ;; checked again). |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2371 (or clip-text primary-text cut-text) |
ca555c0c4e07
(x-select-text, x-cut-buffer-or-selection-value): Check if any of the
Pavel Janík <Pavel@Janik.cz>
parents:
43869
diff
changeset
|
2372 )) |
707 | 2373 |
1546 | 2374 |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2375 ;; Do the actual X Windows setup here; the above code just defines |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2376 ;; functions and variables that we use now. |
1546 | 2377 |
2378 (setq command-line-args (x-handle-args command-line-args)) | |
4132
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2379 |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2380 ;; Make sure we have a valid resource name. |
4132
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2381 (or (stringp x-resource-name) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2382 (let (i) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2383 (setq x-resource-name (invocation-name)) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2384 |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2385 ;; Change any . or * characters in x-resource-name to hyphens, |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2386 ;; so as not to choke when we use it in X resource queries. |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2387 (while (setq i (string-match "[.*]" x-resource-name)) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2388 (aset x-resource-name i ?-)))) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2389 |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2390 (x-open-connection (or x-display-name |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2391 (setq x-display-name (getenv "DISPLAY"))) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2392 x-command-line-resources |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2393 ;; Exit Emacs with fatal error if this fails. |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2394 t) |
1546 | 2395 |
2718
c91b18333f58
* x-win.el: Since we require faces.el, there's no point in setting
Jim Blandy <jimb@redhat.com>
parents:
2586
diff
changeset
|
2396 (setq frame-creation-function 'x-create-frame-with-faces) |
2145
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
2397 |
4306
2e51ffb537a8
(x-handle-iconic): New function.
Richard M. Stallman <rms@gnu.org>
parents:
4280
diff
changeset
|
2398 (setq x-cut-buffer-max (min (- (/ (x-server-max-request-size) 2) 100) |
2e51ffb537a8
(x-handle-iconic): New function.
Richard M. Stallman <rms@gnu.org>
parents:
4280
diff
changeset
|
2399 x-cut-buffer-max)) |
2e51ffb537a8
(x-handle-iconic): New function.
Richard M. Stallman <rms@gnu.org>
parents:
4280
diff
changeset
|
2400 |
49288
7f09b406bc3c
Require fontset unconditionally again.
Kenichi Handa <handa@m17n.org>
parents:
49185
diff
changeset
|
2401 ;; Setup the default fontset. |
7f09b406bc3c
Require fontset unconditionally again.
Kenichi Handa <handa@m17n.org>
parents:
49185
diff
changeset
|
2402 (setup-default-fontset) |
7f09b406bc3c
Require fontset unconditionally again.
Kenichi Handa <handa@m17n.org>
parents:
49185
diff
changeset
|
2403 |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2404 ;; Create the standard fontset. |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2405 (create-fontset-from-fontset-spec standard-fontset-spec t) |
17014
828cf55629fc
Require fontset. Create fontsets from
Karl Heuer <kwzh@gnu.org>
parents:
16835
diff
changeset
|
2406 |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2407 ;; Create fontset specified in X resources "Fontset-N" (N is 0, 1, ...). |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2408 (create-fontset-from-x-resource) |
17014
828cf55629fc
Require fontset. Create fontsets from
Karl Heuer <kwzh@gnu.org>
parents:
16835
diff
changeset
|
2409 |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2410 ;; Try to create a fontset from a font specification which comes |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2411 ;; from initial-frame-alist, default-frame-alist, or X resource. |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2412 ;; A font specification in command line argument (i.e. -fn XXXX) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2413 ;; should be already in default-frame-alist as a `font' |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2414 ;; parameter. However, any font specifications in site-start |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2415 ;; library, user's init file (.emacs), and default.el are not |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2416 ;; yet handled here. |
17014
828cf55629fc
Require fontset. Create fontsets from
Karl Heuer <kwzh@gnu.org>
parents:
16835
diff
changeset
|
2417 |
48091
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2418 (let ((font (or (cdr (assq 'font initial-frame-alist)) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2419 (cdr (assq 'font default-frame-alist)) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2420 (x-get-resource "font" "Font"))) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2421 xlfd-fields resolved-name) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2422 (if (and font |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2423 (not (query-fontset font)) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2424 (setq resolved-name (x-resolve-font-name font)) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2425 (setq xlfd-fields (x-decompose-font-name font))) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2426 (if (string= "fontset" (aref xlfd-fields xlfd-regexp-registry-subnum)) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2427 (new-fontset font (x-complement-fontset-spec xlfd-fields nil)) |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2428 ;; Create a fontset from FONT. The fontset name is |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2429 ;; generated from FONT. |
21fa9981d2ba
Remove some ancient compatibility code. Populate
Dave Love <fx@gnu.org>
parents:
47198
diff
changeset
|
2430 (create-fontset-from-ascii-font font resolved-name "startup")))) |
17014
828cf55629fc
Require fontset. Create fontsets from
Karl Heuer <kwzh@gnu.org>
parents:
16835
diff
changeset
|
2431 |
3172
2a484b449183
* x-win.el: Check for a geometry resource, and apply it to the
Jim Blandy <jimb@redhat.com>
parents:
3081
diff
changeset
|
2432 ;; Apply a geometry resource to the initial frame. Put it at the end |
2a484b449183
* x-win.el: Check for a geometry resource, and apply it to the
Jim Blandy <jimb@redhat.com>
parents:
3081
diff
changeset
|
2433 ;; of the alist, so that anything specified on the command line takes |
2a484b449183
* x-win.el: Check for a geometry resource, and apply it to the
Jim Blandy <jimb@redhat.com>
parents:
3081
diff
changeset
|
2434 ;; precedence. |
10400
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2435 (let* ((res-geometry (x-get-resource "geometry" "Geometry")) |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2436 parsed) |
3172
2a484b449183
* x-win.el: Check for a geometry resource, and apply it to the
Jim Blandy <jimb@redhat.com>
parents:
3081
diff
changeset
|
2437 (if res-geometry |
10400
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2438 (progn |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2439 (setq parsed (x-parse-geometry res-geometry)) |
11821
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
2440 ;; If the resource specifies a position, |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
2441 ;; call the position and size "user-specified". |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
2442 (if (or (assq 'top parsed) (assq 'left parsed)) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
2443 (setq parsed (cons '(user-position . t) |
278e0abb825f
If the geometry resource specifies a position,
Richard M. Stallman <rms@gnu.org>
parents:
11718
diff
changeset
|
2444 (cons '(user-size . t) parsed)))) |
10400
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2445 ;; All geometry parms apply to the initial frame. |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2446 (setq initial-frame-alist (append initial-frame-alist parsed)) |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2447 ;; The size parms apply to all frames. |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2448 (if (assq 'height parsed) |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2449 (setq default-frame-alist |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2450 (cons (cons 'height (cdr (assq 'height parsed))) |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2451 default-frame-alist))) |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2452 (if (assq 'width parsed) |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2453 (setq default-frame-alist |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2454 (cons (cons 'width (cdr (assq 'width parsed))) |
2743977604b1
Put height and width from geometry parm into default-frame-alist.
Richard M. Stallman <rms@gnu.org>
parents:
10094
diff
changeset
|
2455 default-frame-alist)))))) |
3172
2a484b449183
* x-win.el: Check for a geometry resource, and apply it to the
Jim Blandy <jimb@redhat.com>
parents:
3081
diff
changeset
|
2456 |
3966
dcf86f82f2c8
* term/x-win.el: Check the reverseVideo/ReverseVideo resource,
Jim Blandy <jimb@redhat.com>
parents:
3889
diff
changeset
|
2457 ;; Check the reverseVideo resource. |
4132
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2458 (let ((case-fold-search t)) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2459 (let ((rv (x-get-resource "reverseVideo" "ReverseVideo"))) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2460 (if (and rv |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2461 (string-match "^\\(true\\|yes\\|on\\)$" rv)) |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2462 (setq default-frame-alist |
e0345afdf64e
* term/x-win.el: Include (invocation-name) in the error messages
Jim Blandy <jimb@redhat.com>
parents:
3966
diff
changeset
|
2463 (cons '(reverse . t) default-frame-alist))))) |
3966
dcf86f82f2c8
* term/x-win.el: Check the reverseVideo/ReverseVideo resource,
Jim Blandy <jimb@redhat.com>
parents:
3889
diff
changeset
|
2464 |
3493
b37b09c0b43d
(x-selection-timeout): Set it, using x-get-resource.
Richard M. Stallman <rms@gnu.org>
parents:
3373
diff
changeset
|
2465 ;; Set x-selection-timeout, measured in milliseconds. |
b37b09c0b43d
(x-selection-timeout): Set it, using x-get-resource.
Richard M. Stallman <rms@gnu.org>
parents:
3373
diff
changeset
|
2466 (let ((res-selection-timeout |
b37b09c0b43d
(x-selection-timeout): Set it, using x-get-resource.
Richard M. Stallman <rms@gnu.org>
parents:
3373
diff
changeset
|
2467 (x-get-resource "selectionTimeout" "SelectionTimeout"))) |
4280
fcc66d1d9289
(x-selection-timeout): Use 20000 as default.
Richard M. Stallman <rms@gnu.org>
parents:
4273
diff
changeset
|
2468 (setq x-selection-timeout 20000) |
3493
b37b09c0b43d
(x-selection-timeout): Set it, using x-get-resource.
Richard M. Stallman <rms@gnu.org>
parents:
3373
diff
changeset
|
2469 (if res-selection-timeout |
b37b09c0b43d
(x-selection-timeout): Set it, using x-get-resource.
Richard M. Stallman <rms@gnu.org>
parents:
3373
diff
changeset
|
2470 (setq x-selection-timeout (string-to-number res-selection-timeout)))) |
b37b09c0b43d
(x-selection-timeout): Set it, using x-get-resource.
Richard M. Stallman <rms@gnu.org>
parents:
3373
diff
changeset
|
2471 |
2145
aa0b19850348
Cancel previous change, since it discarded
Richard M. Stallman <rms@gnu.org>
parents:
2143
diff
changeset
|
2472 (defun x-win-suspend-error () |
50075
cfb7d0684cf8
(vendor-specific-keysyms, x-last-selected-text-primary): Doc fixes.
John Paul Wallington <jpw@pobox.com>
parents:
49599
diff
changeset
|
2473 (error "Suspending an Emacs running under X makes no sense")) |
2366
ed9b74c46fb9
* x-win.el: Update copyright to 1993.
Jim Blandy <jimb@redhat.com>
parents:
2157
diff
changeset
|
2474 (add-hook 'suspend-hook 'x-win-suspend-error) |
ed9b74c46fb9
* x-win.el: Update copyright to 1993.
Jim Blandy <jimb@redhat.com>
parents:
2157
diff
changeset
|
2475 |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2476 ;; Arrange for the kill and yank functions to set and check the clipboard. |
707 | 2477 (setq interprogram-cut-function 'x-select-text) |
2478 (setq interprogram-paste-function 'x-cut-buffer-or-selection-value) | |
273 | 2479 |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2480 ;; Turn off window-splitting optimization; X is usually fast enough |
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2481 ;; that this is only annoying. |
383 | 2482 (setq split-window-keep-point t) |
2157
0d77768bf3f2
Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2145
diff
changeset
|
2483 |
11290
e7510a23df8e
(mode-line-buffer-identification): Eliminate %F.
Richard M. Stallman <rms@gnu.org>
parents:
10400
diff
changeset
|
2484 ;; Don't show the frame name; that's redundant with X. |
17811 | 2485 (setq-default mode-line-frame-identification " ") |
11290
e7510a23df8e
(mode-line-buffer-identification): Eliminate %F.
Richard M. Stallman <rms@gnu.org>
parents:
10400
diff
changeset
|
2486 |
51181
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2487 ;; Motif direct handling of f10 wasn't working right, |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2488 ;; So temporarily we've turned it off in lwlib-Xm.c |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2489 ;; and turned the Emacs f10 back on. |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2490 ;; ;; Motif normally handles f10 itself, so don't try to handle it a second time. |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2491 ;; (if (featurep 'motif) |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2492 ;; (global-set-key [f10] 'ignore)) |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2493 |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2494 ;; Turn on support for mouse wheels. |
9de1323b5882
(iconify-or-deiconify-frame): Move to frame.el.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
50115
diff
changeset
|
2495 (mouse-wheel-mode 1) |
15058
767429c4d3d2
[motif]: Make f10 undefined.
Richard M. Stallman <rms@gnu.org>
parents:
14977
diff
changeset
|
2496 |
53789
7efe8089eadf
* x-dnd.el: New file for drag and drop.
Jan Djärv <jan.h.d@swipnet.se>
parents:
53745
diff
changeset
|
2497 |
53662
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2498 ;; Enable CLIPBOARD copy/paste through menu bar commands. |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2499 (menu-bar-enable-clipboard) |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2500 |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2501 ;; Override Paste so it looks at CLIPBOARD first. |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2502 (defun x-clipboard-yank () |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2503 "Insert the clipboard contents, or the last stretch of killed text." |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2504 (interactive) |
63191
d9becfcb69a7
(x-clipboard-yank): Remove condition-case
Kenichi Handa <handa@m17n.org>
parents:
63182
diff
changeset
|
2505 (let ((clipboard-text (x-selection-value 'CLIPBOARD)) |
53662
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2506 (x-select-enable-clipboard t)) |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2507 (if (and clipboard-text (> (length clipboard-text) 0)) |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2508 (kill-new clipboard-text)) |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2509 (yank))) |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2510 |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2511 (define-key menu-bar-edit-menu [paste] |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2512 (cons "Paste" (cons "Paste text from clipboard or kill ring" |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2513 'x-clipboard-yank))) |
6f5e6bdd8cda
Enable clipboard on the menu bar and make Paste from the menu bar first
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
2514 |
53789
7efe8089eadf
* x-dnd.el: New file for drag and drop.
Jan Djärv <jan.h.d@swipnet.se>
parents:
53745
diff
changeset
|
2515 ;; Initiate drag and drop |
7efe8089eadf
* x-dnd.el: New file for drag and drop.
Jan Djärv <jan.h.d@swipnet.se>
parents:
53745
diff
changeset
|
2516 (add-hook 'after-make-frame-functions 'x-dnd-init-frame) |
7efe8089eadf
* x-dnd.el: New file for drag and drop.
Jan Djärv <jan.h.d@swipnet.se>
parents:
53745
diff
changeset
|
2517 (global-set-key [drag-n-drop] 'x-dnd-handle-drag-n-drop-event) |
7efe8089eadf
* x-dnd.el: New file for drag and drop.
Jan Djärv <jan.h.d@swipnet.se>
parents:
53745
diff
changeset
|
2518 |
66640
eb72b7c5a0b9
Various comment syntax fixes.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
66389
diff
changeset
|
2519 ;; arch-tag: f1501302-db8b-4d95-88e3-116697d89f78 |
2157
0d77768bf3f2
Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents:
2145
diff
changeset
|
2520 ;;; x-win.el ends here |