annotate lisp/term/x-win.el @ 68270:556ef00fdd9f

*** empty log message ***
author Richard M. Stallman <rms@gnu.org>
date Thu, 19 Jan 2006 17:52:09 +0000
parents eb72b7c5a0b9
children 067115a6e738 693e794b57bf 7beb78bc1f8e
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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
a8fa7c632ee4 Update FSF's address.
Lute Kamstra <lute@gnu.org>
parents: 63191
diff changeset
23 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
a8fa7c632ee4 Update FSF's address.
Lute Kamstra <lute@gnu.org>
parents: 63191
diff changeset
24 ;; Boston, MA 02110-1301, USA.
54
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
25
2157
0d77768bf3f2 Added library headers.
Eric S. Raymond <esr@snark.thyrsus.com>
parents: 2145
diff changeset
26 ;;; Commentary:
54
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
27
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
28 ;; X-win.el: this file is loaded from ../lisp/startup.el when it recognizes
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
29 ;; that X windows are to be used. Command line switches are parsed and those
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
30 ;; pertaining to X are processed and removed from the command line. The
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
31 ;; X display is opened and hooks are set for popping up the initial window.
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
32
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
37
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
38 ;; These are the standard X switches from the Xt Initialize.c file of
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
39 ;; Release 4.
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
40
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
41 ;; Command line Resource Manager string
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
42
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
43 ;; +rv *reverseVideo
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
44 ;; +synchronous *synchronous
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
45 ;; -background *background
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
46 ;; -bd *borderColor
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
47 ;; -bg *background
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
48 ;; -bordercolor *borderColor
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
49 ;; -borderwidth .borderWidth
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
50 ;; -bw .borderWidth
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
51 ;; -display .display
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
52 ;; -fg *foreground
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
53 ;; -fn *font
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
54 ;; -font *font
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
55 ;; -foreground *foreground
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
56 ;; -geometry .geometry
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
57 ;; -iconic .iconic
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
58 ;; -name .name
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
59 ;; -reverse *reverseVideo
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
60 ;; -rv *reverseVideo
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
61 ;; -selectionTimeout .selectionTimeout
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
62 ;; -synchronous *synchronous
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
63 ;; -xrm
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
64
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
65 ;; An alist of X options and the function which handles them. See
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
66 ;; ../startup.el.
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
67
273
0740875c024a *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 192
diff changeset
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
c2dbf1fe0506 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 727
diff changeset
71 (require 'frame)
467
95e458d30014 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 396
diff changeset
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
b809a8da05cb Require menu-bar.el.
Richard M. Stallman <rms@gnu.org>
parents: 2718
diff changeset
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
0740875c024a *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 192
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
88 ;; Handler for switches of the form "-switch value" or "-switch".
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
c2dbf1fe0506 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 727
diff changeset
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
c2dbf1fe0506 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 727
diff changeset
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
c2dbf1fe0506 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 727
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
147 ;; Handle the geometry option
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
184 (defvar x-display-name nil
779
c2dbf1fe0506 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 727
diff changeset
185 "The X display name specifying server and X frame.")
54
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
186
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
187 (defun x-handle-display (switch)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
195
321
4f8a6ec23155 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 303
diff changeset
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
4f8a6ec23155 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 303
diff changeset
200 the switch (e.g., \"-fg\") in the following code, and possible values
7639
67b7d1ea7b2e Doc fix.
Richard M. Stallman <rms@gnu.org>
parents: 7298
diff changeset
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
0740875c024a *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 192
diff changeset
204 (setq x-invocation-args args
0740875c024a *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 192
diff changeset
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
0740875c024a *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 192
diff changeset
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
0740875c024a *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 192
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
309
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
310 ;;
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
311 ;; Standard X cursor shapes, courtesy of Mr. Fox, who wanted ALL of them.
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
312 ;;
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
313
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
314 (defconst x-pointer-X-cursor 0)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
315 (defconst x-pointer-arrow 2)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
316 (defconst x-pointer-based-arrow-down 4)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
317 (defconst x-pointer-based-arrow-up 6)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
318 (defconst x-pointer-boat 8)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
319 (defconst x-pointer-bogosity 10)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
320 (defconst x-pointer-bottom-left-corner 12)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
321 (defconst x-pointer-bottom-right-corner 14)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
322 (defconst x-pointer-bottom-side 16)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
323 (defconst x-pointer-bottom-tee 18)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
324 (defconst x-pointer-box-spiral 20)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
325 (defconst x-pointer-center-ptr 22)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
326 (defconst x-pointer-circle 24)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
327 (defconst x-pointer-clock 26)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
328 (defconst x-pointer-coffee-mug 28)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
329 (defconst x-pointer-cross 30)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
330 (defconst x-pointer-cross-reverse 32)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
331 (defconst x-pointer-crosshair 34)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
332 (defconst x-pointer-diamond-cross 36)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
333 (defconst x-pointer-dot 38)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
334 (defconst x-pointer-dotbox 40)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
335 (defconst x-pointer-double-arrow 42)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
336 (defconst x-pointer-draft-large 44)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
337 (defconst x-pointer-draft-small 46)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
338 (defconst x-pointer-draped-box 48)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
339 (defconst x-pointer-exchange 50)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
340 (defconst x-pointer-fleur 52)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
341 (defconst x-pointer-gobbler 54)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
342 (defconst x-pointer-gumby 56)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
343 (defconst x-pointer-hand1 58)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
344 (defconst x-pointer-hand2 60)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
345 (defconst x-pointer-heart 62)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
346 (defconst x-pointer-icon 64)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
347 (defconst x-pointer-iron-cross 66)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
348 (defconst x-pointer-left-ptr 68)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
349 (defconst x-pointer-left-side 70)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
350 (defconst x-pointer-left-tee 72)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
351 (defconst x-pointer-leftbutton 74)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
352 (defconst x-pointer-ll-angle 76)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
353 (defconst x-pointer-lr-angle 78)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
354 (defconst x-pointer-man 80)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
355 (defconst x-pointer-middlebutton 82)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
356 (defconst x-pointer-mouse 84)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
357 (defconst x-pointer-pencil 86)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
358 (defconst x-pointer-pirate 88)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
359 (defconst x-pointer-plus 90)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
360 (defconst x-pointer-question-arrow 92)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
361 (defconst x-pointer-right-ptr 94)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
362 (defconst x-pointer-right-side 96)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
363 (defconst x-pointer-right-tee 98)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
364 (defconst x-pointer-rightbutton 100)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
365 (defconst x-pointer-rtl-logo 102)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
366 (defconst x-pointer-sailboat 104)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
367 (defconst x-pointer-sb-down-arrow 106)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
368 (defconst x-pointer-sb-h-double-arrow 108)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
369 (defconst x-pointer-sb-left-arrow 110)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
370 (defconst x-pointer-sb-right-arrow 112)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
371 (defconst x-pointer-sb-up-arrow 114)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
372 (defconst x-pointer-sb-v-double-arrow 116)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
373 (defconst x-pointer-shuttle 118)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
374 (defconst x-pointer-sizing 120)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
375 (defconst x-pointer-spider 122)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
376 (defconst x-pointer-spraycan 124)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
377 (defconst x-pointer-star 126)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
378 (defconst x-pointer-target 128)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
379 (defconst x-pointer-tcross 130)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
380 (defconst x-pointer-top-left-arrow 132)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
381 (defconst x-pointer-top-left-corner 134)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
382 (defconst x-pointer-top-right-corner 136)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
383 (defconst x-pointer-top-side 138)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
384 (defconst x-pointer-top-tee 140)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
385 (defconst x-pointer-trek 142)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
386 (defconst x-pointer-ul-angle 144)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
387 (defconst x-pointer-umbrella 146)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
388 (defconst x-pointer-ur-angle 148)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
389 (defconst x-pointer-watch 150)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
390 (defconst x-pointer-xterm 152)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
391
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
392 ;;
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
393 ;; Available colors
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
394 ;;
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1154 (let ((all-colors x-colors)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1155 (this-color nil)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1156 (defined-colors nil))
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1157 (while all-colors
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1158 (setq this-color (car all-colors)
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1161 (setq defined-colors (cons this-color defined-colors))))
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
1162 defined-colors))
396
d0eb77a4d8f7 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
1163
d0eb77a4d8f7 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
1164 ;;;; Function keys
d0eb77a4d8f7 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 385
diff changeset
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
da9a60e97e72 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 1266
diff changeset
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
fb1b760f6636 (vendor-specific-keysyms):
Karl Heuer <kwzh@gnu.org>
parents: 12443
diff changeset
1252 '((392976 . f36)
fb1b760f6636 (vendor-specific-keysyms):
Karl Heuer <kwzh@gnu.org>
parents: 12443
diff changeset
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
bacfccb982c9 Initial revision
Jim Blandy <jimb@redhat.com>
parents:
diff changeset
2116
1546
da9a60e97e72 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 1266
diff changeset
2117 ;;;; Selections and cut buffers
707
e4253da532fb *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 643
diff changeset
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
540b047ece4d *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 707
diff changeset
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
9759addc5671 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 506
diff changeset
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
625168ecac3f *** empty log message ***
Kenichi Handa <handa@m17n.org>
parents: 53744
diff changeset
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
e4253da532fb *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 643
diff changeset
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
bf6b4bc3ccc0 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 1265
diff changeset
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
e4253da532fb *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 643
diff changeset
2373
1546
da9a60e97e72 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 1266
diff changeset
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
da9a60e97e72 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 1266
diff changeset
2377
da9a60e97e72 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 1266
diff changeset
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
da9a60e97e72 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 1266
diff changeset
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
e4253da532fb *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 643
diff changeset
2477 (setq interprogram-cut-function 'x-select-text)
e4253da532fb *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 643
diff changeset
2478 (setq interprogram-paste-function 'x-cut-buffer-or-selection-value)
273
0740875c024a *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 192
diff changeset
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
4f7094a6b826 *** empty log message ***
Jim Blandy <jimb@redhat.com>
parents: 380
diff changeset
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
b3b2e2db1de7 Fix previous change.
Richard M. Stallman <rms@gnu.org>
parents: 17809
diff changeset
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