Mercurial > emacs
annotate src/xterm.h @ 82182:78ee45af2b61
(mode-line-remote): Use updated %@ construct.
author | Nick Roberts <nickrob@snap.net.nz> |
---|---|
date | Sat, 28 Jul 2007 01:24:33 +0000 |
parents | bfb968b72892 |
children | e5a68f18fcb9 65663fcd2caa 539530fa389c |
rev | line source |
---|---|
259 | 1 /* Definitions and headers for communication with X protocol. |
64770
a0d1312ede66
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
2 Copyright (C) 1989, 1993, 1994, 1998, 1999, 2000, 2001, 2002, 2003, |
75348 | 3 2004, 2005, 2006, 2007 Free Software Foundation, Inc. |
259 | 4 |
5 This file is part of GNU Emacs. | |
6 | |
7 GNU Emacs is free software; you can redistribute it and/or modify | |
8 it under the terms of the GNU General Public License as published by | |
78260
922696f363b0
Switch license to GPLv3 or later.
Glenn Morris <rgm@gnu.org>
parents:
75348
diff
changeset
|
9 the Free Software Foundation; either version 3, or (at your option) |
259 | 10 any later version. |
11 | |
12 GNU Emacs is distributed in the hope that it will be useful, | |
13 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 GNU General Public License for more details. | |
16 | |
17 You should have received a copy of the GNU General Public License | |
18 along with GNU Emacs; see the file COPYING. If not, write to | |
64084 | 19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
20 Boston, MA 02110-1301, USA. */ | |
259 | 21 |
22 #include <X11/Xlib.h> | |
23 #include <X11/cursorfont.h> | |
57498 | 24 |
25 /* Include Xutil.h after keysym.h to work around a bug that prevents | |
26 correct recognition of AltGr key in some X versions. */ | |
27 | |
57488
40d3f64bc0e5
Include Xutil.h after keysym.h to work around bug
Kim F. Storm <storm@cua.dk>
parents:
56135
diff
changeset
|
28 #include <X11/keysym.h> |
259 | 29 #include <X11/Xutil.h> |
57498 | 30 |
259 | 31 #include <X11/Xatom.h> |
32 #include <X11/Xresource.h> | |
33 | |
5656
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
34 #ifdef USE_X_TOOLKIT |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
35 #include <X11/StringDefs.h> |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
36 #include <X11/IntrinsicP.h> /* CoreP.h needs this */ |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
37 #include <X11/CoreP.h> /* foul, but we need this to use our own |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
38 window inside a widget instead of one |
5656
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
39 that Xt creates... */ |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
40 #include <X11/StringDefs.h> |
49322 | 41 |
42 typedef Widget xt_or_gtk_widget; | |
43 #endif | |
44 | |
45 #ifdef USE_GTK | |
46 #include <gtk/gtk.h> | |
47 #include <gdk/gdkx.h> | |
48 | |
49 /* Some definitions to reduce conditionals. */ | |
50 typedef GtkWidget *xt_or_gtk_widget; | |
51 #define XtParent(x) (gtk_widget_get_parent (x)) | |
50000
8b7db04f3672
* xterm.h (XSync): Define as gdk_window_process_all_updates for GTK.
Jan Djärv <jan.h.d@swipnet.se>
parents:
49600
diff
changeset
|
52 #undef XSync |
57624
6178d4e9b661
* xterm.h (XSync): If USE_GTK, define XSync as process_all and then
Jan Djärv <jan.h.d@swipnet.se>
parents:
57498
diff
changeset
|
53 #define XSync(d, b) do { gdk_window_process_all_updates (); \ |
6178d4e9b661
* xterm.h (XSync): If USE_GTK, define XSync as process_all and then
Jan Djärv <jan.h.d@swipnet.se>
parents:
57498
diff
changeset
|
54 XSync (d, b); } while (0) |
57954
328dc625a959
(x_start_queuing_selection_requests)
Kim F. Storm <storm@cua.dk>
parents:
57633
diff
changeset
|
55 |
49322 | 56 |
50000
8b7db04f3672
* xterm.h (XSync): Define as gdk_window_process_all_updates for GTK.
Jan Djärv <jan.h.d@swipnet.se>
parents:
49600
diff
changeset
|
57 #endif /* USE_GTK */ |
5656
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
58 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
59 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
60 /* Bookkeeping to distinguish X versions. */ |
999 | 61 |
1040 | 62 /* HAVE_X11R4 is defined if we have the features of X11R4. It should |
63 be defined when we're using X11R5, since X11R5 has the features of | |
64 X11R4. If, in the future, we find we need more of these flags | |
65 (HAVE_X11R5, for example), code should always be written to test | |
66 the most recent flag first: | |
67 | |
68 #ifdef HAVE_X11R5 | |
69 ... | |
70 #elif HAVE_X11R4 | |
71 ... | |
72 #elif HAVE_X11 | |
73 ... | |
74 #endif | |
75 | |
76 If you ever find yourself writing a "#ifdef HAVE_FOO" clause that | |
77 looks a lot like another one, consider moving the text into a macro | |
78 whose definition is configuration-dependent, but whose usage is | |
79 universal - like the stuff in systime.h. | |
80 | |
81 It turns out that we can auto-detect whether we're being compiled | |
999 | 82 with X11R3 or X11R4 by looking for the flag macros for R4 structure |
83 members that R3 doesn't have. */ | |
84 #ifdef PBaseSize | |
4711
94fe4e71f7fc
(HAVE_X11R4): If AIX, do not define HAVE_X11R4.
Richard M. Stallman <rms@gnu.org>
parents:
3883
diff
changeset
|
85 /* AIX 3.1's X is somewhere between X11R3 and X11R4. It has |
94fe4e71f7fc
(HAVE_X11R4): If AIX, do not define HAVE_X11R4.
Richard M. Stallman <rms@gnu.org>
parents:
3883
diff
changeset
|
86 PBaseSize, but not XWithdrawWindow, XSetWMName, XSetWMNormalHints, |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
87 XSetWMIconName. |
6603
ec7c89180b65
Define HAVE_X11R4 if AIX3_2 is defined.
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6571
diff
changeset
|
88 AIX 3.2 is at least X11R4. */ |
ec7c89180b65
Define HAVE_X11R4 if AIX3_2 is defined.
Fred Pierresteguy <F.Pierresteguy@frcl.bull.fr>
parents:
6571
diff
changeset
|
89 #if (!defined AIX) || (defined AIX3_2) |
999 | 90 #define HAVE_X11R4 |
91 #endif | |
4711
94fe4e71f7fc
(HAVE_X11R4): If AIX, do not define HAVE_X11R4.
Richard M. Stallman <rms@gnu.org>
parents:
3883
diff
changeset
|
92 #endif |
999 | 93 |
15529
f36477de186c
Don't define HAVE_X11R5 here.
Richard M. Stallman <rms@gnu.org>
parents:
15043
diff
changeset
|
94 #ifdef HAVE_X11R5 |
6870
4b783d429e6e
(HAVE_X11R4): If we define HAVE_X11R5, define this too.
Richard M. Stallman <rms@gnu.org>
parents:
6769
diff
changeset
|
95 /* In case someone has X11R5 on AIX 3.1, |
4b783d429e6e
(HAVE_X11R4): If we define HAVE_X11R5, define this too.
Richard M. Stallman <rms@gnu.org>
parents:
6769
diff
changeset
|
96 make sure HAVE_X11R4 is defined as well as HAVE_X11R5. */ |
4b783d429e6e
(HAVE_X11R4): If we define HAVE_X11R5, define this too.
Richard M. Stallman <rms@gnu.org>
parents:
6769
diff
changeset
|
97 #define HAVE_X11R4 |
2300
dfef2f43f4bf
* xfns.c (Fx_open_connection): If we have X11R5, use
Jim Blandy <jimb@redhat.com>
parents:
2208
diff
changeset
|
98 #endif |
13346
620c6dc0329c
Move the include of Xlocale.h after setting HAVE_X11R5.
Richard M. Stallman <rms@gnu.org>
parents:
13315
diff
changeset
|
99 |
28146
b539b87a97bd
(HAVE_X_I18N) [HAVE_X11R6]: Moved to config.in.
Gerd Moellmann <gerd@gnu.org>
parents:
27992
diff
changeset
|
100 #ifdef HAVE_X_I18N |
13346
620c6dc0329c
Move the include of Xlocale.h after setting HAVE_X11R5.
Richard M. Stallman <rms@gnu.org>
parents:
13315
diff
changeset
|
101 #include <X11/Xlocale.h> |
620c6dc0329c
Move the include of Xlocale.h after setting HAVE_X11R5.
Richard M. Stallman <rms@gnu.org>
parents:
13315
diff
changeset
|
102 #endif |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
103 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
104 #define BLACK_PIX_DEFAULT(f) BlackPixel (FRAME_X_DISPLAY (f), \ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
105 XScreenNumberOfScreen (FRAME_X_SCREEN (f))) |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
106 #define WHITE_PIX_DEFAULT(f) WhitePixel (FRAME_X_DISPLAY (f), \ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
107 XScreenNumberOfScreen (FRAME_X_SCREEN (f))) |
259 | 108 |
109 #define FONT_WIDTH(f) ((f)->max_bounds.width) | |
110 #define FONT_HEIGHT(f) ((f)->ascent + (f)->descent) | |
111 #define FONT_BASE(f) ((f)->ascent) | |
50152
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
112 #define FONT_DESCENT(f) ((f)->descent) |
259 | 113 |
114 /* The mask of events that text windows always want to receive. This | |
15043
a0716ac97a83
(STANDARD_EVENT_SET): Remove PointerNotifyHintMask.
Richard M. Stallman <rms@gnu.org>
parents:
14829
diff
changeset
|
115 includes mouse movement events, since handling the mouse-font text property |
a0716ac97a83
(STANDARD_EVENT_SET): Remove PointerNotifyHintMask.
Richard M. Stallman <rms@gnu.org>
parents:
14829
diff
changeset
|
116 means that we must track mouse motion all the time. */ |
259 | 117 |
118 #define STANDARD_EVENT_SET \ | |
119 (KeyPressMask \ | |
120 | ExposureMask \ | |
121 | ButtonPressMask \ | |
424 | 122 | ButtonReleaseMask \ |
123 | PointerMotionMask \ | |
259 | 124 | StructureNotifyMask \ |
125 | FocusChangeMask \ | |
126 | LeaveWindowMask \ | |
127 | EnterWindowMask \ | |
128 | VisibilityChangeMask) | |
129 | |
9692 | 130 /* Structure recording X pixmap and reference count. |
131 If REFCOUNT is 0 then this record is free to be reused. */ | |
132 | |
133 struct x_bitmap_record | |
134 { | |
135 Pixmap pixmap; | |
52090
3c8a655b53e0
(struct x_bitmap_record): New member have_mask.
Kenichi Handa <handa@m17n.org>
parents:
51899
diff
changeset
|
136 int have_mask; |
51899
5c89c59e087d
(xg_set_icon): New function.
Juanma Barranquero <lekktu@gmail.com>
parents:
51214
diff
changeset
|
137 Pixmap mask; |
9692 | 138 char *file; |
139 int refcount; | |
140 /* Record some info about this pixmap. */ | |
141 int height, width, depth; | |
142 }; | |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
143 |
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
144 /* For each X display, we have a structure that records |
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
145 information about it. */ |
259 | 146 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
147 struct x_display_info |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
148 { |
9692 | 149 /* Chain of all x_display_info structures. */ |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
150 struct x_display_info *next; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
151 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
152 /* Connection number (normally a file descriptor number). */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
153 int connection; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
154 |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
155 /* This says how to access this display in Xlib. */ |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
156 Display *display; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
157 |
9692 | 158 /* This is a cons cell of the form (NAME . FONT-LIST-CACHE). |
159 The same cons cell also appears in x_display_name_list. */ | |
160 Lisp_Object name_list_element; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
161 |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
162 /* Number of frames that are on this display. */ |
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
163 int reference_count; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
164 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
165 /* The Screen this connection is connected to. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
166 Screen *screen; |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
167 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
168 /* Dots per inch of the screen. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
169 double resx, resy; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
170 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
171 /* The Visual being used for this display. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
172 Visual *visual; |
27986
8cc3bff16c28
(struct x_display_info): Add Colormap member `cmap'.
Gerd Moellmann <gerd@gnu.org>
parents:
27501
diff
changeset
|
173 |
42997 | 174 /* The colormap being used. */ |
27986
8cc3bff16c28
(struct x_display_info): Add Colormap member `cmap'.
Gerd Moellmann <gerd@gnu.org>
parents:
27501
diff
changeset
|
175 Colormap cmap; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
176 |
56111
54633f72f8db
* xterm.h (struct x_display_info): Typo in comment fixed.
Jan Djärv <jan.h.d@swipnet.se>
parents:
55031
diff
changeset
|
177 /* Number of planes on this screen. */ |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
178 int n_planes; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
179 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
180 /* Dimensions of this screen. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
181 int height, width; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
182 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
183 /* Mask of things that cause the mouse to be grabbed. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
184 int grabbed; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
185 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
186 /* Emacs bitmap-id of the default icon bitmap for this frame. |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
187 Or -1 if none has been allocated yet. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
188 int icon_bitmap_id; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
189 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
190 /* The root window of this screen. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
191 Window root_window; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
192 |
52298
1a4bd2bec861
Create and initialize a client leader window so session management
Jan Djärv <jan.h.d@swipnet.se>
parents:
52090
diff
changeset
|
193 /* Client leader window. */ |
1a4bd2bec861
Create and initialize a client leader window so session management
Jan Djärv <jan.h.d@swipnet.se>
parents:
52090
diff
changeset
|
194 Window client_leader_window; |
1a4bd2bec861
Create and initialize a client leader window so session management
Jan Djärv <jan.h.d@swipnet.se>
parents:
52090
diff
changeset
|
195 |
9692 | 196 /* The cursor to use for vertical scroll bars. */ |
197 Cursor vertical_scroll_bar_cursor; | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
198 |
53069
1218a42792ea
Implement multiple display handling for GTK.
Jan Djärv <jan.h.d@swipnet.se>
parents:
52754
diff
changeset
|
199 #ifdef USE_GTK |
1218a42792ea
Implement multiple display handling for GTK.
Jan Djärv <jan.h.d@swipnet.se>
parents:
52754
diff
changeset
|
200 /* The GDK cursor for scroll bars and popup menus. */ |
1218a42792ea
Implement multiple display handling for GTK.
Jan Djärv <jan.h.d@swipnet.se>
parents:
52754
diff
changeset
|
201 GdkCursor *xg_cursor; |
1218a42792ea
Implement multiple display handling for GTK.
Jan Djärv <jan.h.d@swipnet.se>
parents:
52754
diff
changeset
|
202 #endif |
1218a42792ea
Implement multiple display handling for GTK.
Jan Djärv <jan.h.d@swipnet.se>
parents:
52754
diff
changeset
|
203 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
204 /* X Resource data base */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
205 XrmDatabase xrdb; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
206 |
9692 | 207 /* A table of all the fonts we have already loaded. */ |
208 struct font_info *font_table; | |
209 | |
210 /* The current capacity of x_font_table. */ | |
211 int font_table_size; | |
212 | |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
213 /* Minimum width over all characters in all fonts in font_table. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
214 int smallest_char_width; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
215 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
216 /* Minimum font height over all fonts in font_table. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
217 int smallest_font_height; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
218 |
9692 | 219 /* Reusable Graphics Context for drawing a cursor in a non-default face. */ |
220 GC scratch_cursor_gc; | |
221 | |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
222 /* These variables describe the range of text currently shown in its |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
223 mouse-face, together with the window they apply to. As long as |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
224 the mouse stays within this range, we need not redraw anything on |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
225 its account. Rows and columns are glyph matrix positions in |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
226 MOUSE_FACE_WINDOW. */ |
9692 | 227 int mouse_face_beg_row, mouse_face_beg_col; |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
228 int mouse_face_beg_x, mouse_face_beg_y; |
9692 | 229 int mouse_face_end_row, mouse_face_end_col; |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
230 int mouse_face_end_x, mouse_face_end_y; |
9692 | 231 int mouse_face_past_end; |
232 Lisp_Object mouse_face_window; | |
233 int mouse_face_face_id; | |
36586
1879cd230f9c
(struct x_display_info): Add mouse_face_overlay.
Gerd Moellmann <gerd@gnu.org>
parents:
36254
diff
changeset
|
234 Lisp_Object mouse_face_overlay; |
9692 | 235 |
236 /* 1 if a mouse motion event came and we didn't handle it right away because | |
237 gc was in progress. */ | |
238 int mouse_face_deferred_gc; | |
239 | |
240 /* FRAME and X, Y position of mouse when last checked for | |
241 highlighting. X and Y can be negative or out of range for the frame. */ | |
242 struct frame *mouse_face_mouse_frame; | |
243 int mouse_face_mouse_x, mouse_face_mouse_y; | |
244 | |
245 /* Nonzero means defer mouse-motion highlighting. */ | |
246 int mouse_face_defer; | |
247 | |
43368
578ba74970b1
(struct x_display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
42997
diff
changeset
|
248 /* Nonzero means that the mouse highlight should not be shown. */ |
578ba74970b1
(struct x_display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
42997
diff
changeset
|
249 int mouse_face_hidden; |
578ba74970b1
(struct x_display_info): Add mouse_face_hidden.
Kim F. Storm <storm@cua.dk>
parents:
42997
diff
changeset
|
250 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
251 int mouse_face_image_state; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
252 |
9692 | 253 char *x_id_name; |
254 | |
255 /* The number of fonts actually stored in x_font_table. | |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
256 font_table[n] is used and valid iff 0 <= n < n_fonts. 0 <= |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
257 n_fonts <= font_table_size and font_table[i].name != 0. */ |
9692 | 258 int n_fonts; |
259 | |
260 /* Pointer to bitmap records. */ | |
261 struct x_bitmap_record *bitmaps; | |
262 | |
263 /* Allocated size of bitmaps field. */ | |
264 int bitmaps_size; | |
265 | |
266 /* Last used bitmap index. */ | |
267 int bitmaps_last; | |
268 | |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
269 /* Which modifier keys are on which modifier bits? |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
270 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
271 With each keystroke, X returns eight bits indicating which modifier |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
272 keys were held down when the key was pressed. The interpretation |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
273 of the top five modifier bits depends on what keys are attached |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
274 to them. If the Meta_L and Meta_R keysyms are on mod5, then mod5 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
275 is the meta bit. |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
276 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
277 meta_mod_mask is a mask containing the bits used for the meta key. |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
278 It may have more than one bit set, if more than one modifier bit |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
279 has meta keys on it. Basically, if EVENT is a KeyPress event, |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
280 the meta key is pressed if (EVENT.state & meta_mod_mask) != 0. |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
281 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
282 shift_lock_mask is LockMask if the XK_Shift_Lock keysym is on the |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
283 lock modifier bit, or zero otherwise. Non-alphabetic keys should |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
284 only be affected by the lock modifier bit if XK_Shift_Lock is in |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
285 use; XK_Caps_Lock should only affect alphabetic keys. With this |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
286 arrangement, the lock modifier should shift the character if |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
287 (EVENT.state & shift_lock_mask) != 0. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
288 int meta_mod_mask, shift_lock_mask; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
289 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
290 /* These are like meta_mod_mask, but for different modifiers. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
291 int alt_mod_mask, super_mod_mask, hyper_mod_mask; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
292 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
293 /* Communication with window managers. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
294 Atom Xatom_wm_protocols; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
295 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
296 /* Kinds of protocol things we may receive. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
297 Atom Xatom_wm_take_focus; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
298 Atom Xatom_wm_save_yourself; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
299 Atom Xatom_wm_delete_window; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
300 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
301 /* Atom for indicating window state to the window manager. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
302 Atom Xatom_wm_change_state; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
303 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
304 /* Other WM communication */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
305 Atom Xatom_wm_configure_denied; /* When our config request is denied */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
306 Atom Xatom_wm_window_moved; /* When the WM moves us. */ |
52298
1a4bd2bec861
Create and initialize a client leader window so session management
Jan Djärv <jan.h.d@swipnet.se>
parents:
52090
diff
changeset
|
307 Atom Xatom_wm_client_leader; /* Id of client leader window. */ |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
308 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
309 /* EditRes protocol */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
310 Atom Xatom_editres; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
311 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
312 /* More atoms, which are selection types. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
313 Atom Xatom_CLIPBOARD, Xatom_TIMESTAMP, Xatom_TEXT, Xatom_DELETE, |
46883
d69b36b954c3
(struct x_display_info): New member Xatom_UTF8_STRING.
Kenichi Handa <handa@m17n.org>
parents:
46706
diff
changeset
|
314 Xatom_COMPOUND_TEXT, Xatom_UTF8_STRING, |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
315 Xatom_MULTIPLE, Xatom_INCR, Xatom_EMACS_TMP, Xatom_TARGETS, Xatom_NULL, |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
316 Xatom_ATOM_PAIR; |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
317 |
17104
b2a15ee1d181
(struct x_display_info): New member Xatom_MULE_DEFAULT_ASCENT.
Kenichi Handa <handa@m17n.org>
parents:
17051
diff
changeset
|
318 /* More atoms for font properties. The last three are private |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
319 properties, see the comments in src/fontset.h. */ |
59204
d0fe8e91ef27
(struct x_display_info): New member Xatom_AVERAGE_WIDTH.
Kenichi Handa <handa@m17n.org>
parents:
58283
diff
changeset
|
320 Atom Xatom_PIXEL_SIZE, Xatom_AVERAGE_WIDTH, |
17104
b2a15ee1d181
(struct x_display_info): New member Xatom_MULE_DEFAULT_ASCENT.
Kenichi Handa <handa@m17n.org>
parents:
17051
diff
changeset
|
321 Xatom_MULE_BASELINE_OFFSET, Xatom_MULE_RELATIVE_COMPOSE, |
b2a15ee1d181
(struct x_display_info): New member Xatom_MULE_DEFAULT_ASCENT.
Kenichi Handa <handa@m17n.org>
parents:
17051
diff
changeset
|
322 Xatom_MULE_DEFAULT_ASCENT; |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
323 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
324 /* More atoms for Ghostscript support. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
325 Atom Xatom_DONE, Xatom_PAGE; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
326 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
327 /* Atom used in toolkit scroll bar client messages. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
328 Atom Xatom_Scrollbar; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
329 |
11013
f0fe22922005
(struct x_display_info): member kboard (formerly perdisplay) is now a pointer,
Karl Heuer <kwzh@gnu.org>
parents:
10741
diff
changeset
|
330 #ifdef MULTI_KBOARD |
11352
800e56de3795
(struct x_display_info): Use `struct kboard', not KBOARD.
Richard M. Stallman <rms@gnu.org>
parents:
11163
diff
changeset
|
331 struct kboard *kboard; |
11013
f0fe22922005
(struct x_display_info): member kboard (formerly perdisplay) is now a pointer,
Karl Heuer <kwzh@gnu.org>
parents:
10741
diff
changeset
|
332 #endif |
11163
d6b56a8f415b
(struct x_display_info): New member cut_buffers_initialized.
Karl Heuer <kwzh@gnu.org>
parents:
11013
diff
changeset
|
333 int cut_buffers_initialized; /* Whether we're sure they all exist */ |
11538
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
334 |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
335 /* The frame (if any) which has the X window that has keyboard focus. |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
336 Zero if none. This is examined by Ffocus_frame in xfns.c. Note |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
337 that a mere EnterNotify event can set this; if you need to know the |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
338 last frame specified in a FocusIn or FocusOut event, use |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
339 x_focus_event_frame. */ |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
340 struct frame *x_focus_frame; |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
341 |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
342 /* The last frame mentioned in a FocusIn or FocusOut event. This is |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
343 separate from x_focus_frame, because whether or not LeaveNotify |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
344 events cause us to lose focus depends on whether or not we have |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
345 received a FocusIn event for it. */ |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
346 struct frame *x_focus_event_frame; |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
347 |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
348 /* The frame which currently has the visual highlight, and should get |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
349 keyboard input (other sorts of input have the frame encoded in the |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
350 event). It points to the X focus frame's selected window's |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
351 frame. It differs from x_focus_frame when we're using a global |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
352 minibuffer. */ |
d0bd2102adbc
(struct x_display_info): New members x_focus_frame,
Karl Heuer <kwzh@gnu.org>
parents:
11352
diff
changeset
|
353 struct frame *x_highlight_frame; |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
354 |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
355 /* The null pixel used for filling a character background with |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
356 background color of a gc. */ |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
357 Pixmap null_pixel; |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
358 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
359 /* The gray pixmap. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
360 Pixmap gray; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
361 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
362 /* Cache of images. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
363 struct image_cache *image_cache; |
27501
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
364 |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
365 #ifdef HAVE_X_I18N |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
366 /* XIM (X Input method). */ |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
367 XIM xim; |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
368 XIMStyles *xim_styles; |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
369 #endif |
32608
0c09f18456e3
(struct x_display_info): Add color_cells and ncolor_cells.
Gerd Moellmann <gerd@gnu.org>
parents:
30353
diff
changeset
|
370 |
0c09f18456e3
(struct x_display_info): Add color_cells and ncolor_cells.
Gerd Moellmann <gerd@gnu.org>
parents:
30353
diff
changeset
|
371 /* If non-null, a cache of the colors in the color map. Don't |
0c09f18456e3
(struct x_display_info): Add color_cells and ncolor_cells.
Gerd Moellmann <gerd@gnu.org>
parents:
30353
diff
changeset
|
372 use this directly, call x_color_cells instead. */ |
0c09f18456e3
(struct x_display_info): Add color_cells and ncolor_cells.
Gerd Moellmann <gerd@gnu.org>
parents:
30353
diff
changeset
|
373 XColor *color_cells; |
0c09f18456e3
(struct x_display_info): Add color_cells and ncolor_cells.
Gerd Moellmann <gerd@gnu.org>
parents:
30353
diff
changeset
|
374 int ncolor_cells; |
52387
2415f47f227a
Fix pixel calculation for TrueVisuals.
Jan Djärv <jan.h.d@swipnet.se>
parents:
52298
diff
changeset
|
375 |
52752
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
376 /* Bits and shifts to use to compose pixel values on TrueColor visuals. */ |
52387
2415f47f227a
Fix pixel calculation for TrueVisuals.
Jan Djärv <jan.h.d@swipnet.se>
parents:
52298
diff
changeset
|
377 int red_bits, blue_bits, green_bits; |
2415f47f227a
Fix pixel calculation for TrueVisuals.
Jan Djärv <jan.h.d@swipnet.se>
parents:
52298
diff
changeset
|
378 int red_offset, blue_offset, green_offset; |
52752
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
379 |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
380 /* The type of window manager we have. If we move FRAME_OUTER_WINDOW |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
381 to x/y 0/0, some window managers (type A) puts the window manager |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
382 decorations outside the screen and FRAME_OUTER_WINDOW exactly at 0/0. |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
383 Other window managers (type B) puts the window including decorations |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
384 at 0/0, so FRAME_OUTER_WINDOW is a bit below 0/0. |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
385 Record the type of WM in use so we can compensate for type A WMs. */ |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
386 enum |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
387 { |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
388 X_WMTYPE_UNKNOWN, |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
389 X_WMTYPE_A, |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
390 X_WMTYPE_B |
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
391 } wm_type; |
72353
5f6d1ddc1872
* xterm.h (struct x_display_info): Add x_dnd_atoms* to keep track
Jan Djärv <jan.h.d@swipnet.se>
parents:
71367
diff
changeset
|
392 |
5f6d1ddc1872
* xterm.h (struct x_display_info): Add x_dnd_atoms* to keep track
Jan Djärv <jan.h.d@swipnet.se>
parents:
71367
diff
changeset
|
393 |
73866
e240939ffc28
(struct x_display_info): Fix indentation.
Jan Djärv <jan.h.d@swipnet.se>
parents:
72854
diff
changeset
|
394 /* Atoms that are drag and drop atoms */ |
e240939ffc28
(struct x_display_info): Fix indentation.
Jan Djärv <jan.h.d@swipnet.se>
parents:
72854
diff
changeset
|
395 Atom *x_dnd_atoms; |
e240939ffc28
(struct x_display_info): Fix indentation.
Jan Djärv <jan.h.d@swipnet.se>
parents:
72854
diff
changeset
|
396 size_t x_dnd_atoms_size; |
e240939ffc28
(struct x_display_info): Fix indentation.
Jan Djärv <jan.h.d@swipnet.se>
parents:
72854
diff
changeset
|
397 size_t x_dnd_atoms_length; |
e240939ffc28
(struct x_display_info): Fix indentation.
Jan Djärv <jan.h.d@swipnet.se>
parents:
72854
diff
changeset
|
398 |
75135
c42f3e23e076
(x_display_info): New: net_supported_atoms,
Jan Djärv <jan.h.d@swipnet.se>
parents:
73866
diff
changeset
|
399 /* Extended window manager hints, Atoms supported by the window manager */ |
c42f3e23e076
(x_display_info): New: net_supported_atoms,
Jan Djärv <jan.h.d@swipnet.se>
parents:
73866
diff
changeset
|
400 Atom *net_supported_atoms; |
c42f3e23e076
(x_display_info): New: net_supported_atoms,
Jan Djärv <jan.h.d@swipnet.se>
parents:
73866
diff
changeset
|
401 int nr_net_supported_atoms; |
c42f3e23e076
(x_display_info): New: net_supported_atoms,
Jan Djärv <jan.h.d@swipnet.se>
parents:
73866
diff
changeset
|
402 Window net_supported_window; |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
403 }; |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
404 |
51128 | 405 #ifdef HAVE_X_I18N |
406 /* Whether or not to use XIM if we have it. */ | |
407 extern int use_xim; | |
408 #endif | |
409 | |
30321 | 410 /* This checks to make sure we have a display. */ |
411 extern void check_x P_ ((void)); | |
412 | |
413 extern struct frame *x_window_to_frame P_ ((struct x_display_info *, int)); | |
414 | |
49322 | 415 #if defined (USE_X_TOOLKIT) || defined (USE_GTK) |
30321 | 416 extern struct frame *x_any_window_to_frame P_ ((struct x_display_info *, int)); |
417 extern struct frame *x_non_menubar_window_to_frame P_ ((struct x_display_info *, int)); | |
418 extern struct frame *x_top_window_to_frame P_ ((struct x_display_info *, int)); | |
419 #endif | |
420 | |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
421 /* This is a chain of structures for all the X displays currently in use. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
422 extern struct x_display_info *x_display_list; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
423 |
9692 | 424 /* This is a list of cons cells, each of the form (NAME . FONT-LIST-CACHE), |
425 one for each element of x_display_list and in the same order. | |
426 NAME is the name of the frame. | |
427 FONT-LIST-CACHE records previous values returned by x-list-fonts. */ | |
428 extern Lisp_Object x_display_name_list; | |
429 | |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
430 /* Regexp matching a font name whose width is the same as `PIXEL_SIZE'. */ |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
431 extern Lisp_Object Vx_pixel_size_width_font_regexp; |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
432 |
30321 | 433 extern struct x_display_info *x_display_info_for_display P_ ((Display *)); |
434 extern struct x_display_info *x_display_info_for_name P_ ((Lisp_Object)); | |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
435 |
30321 | 436 extern struct x_display_info *x_term_init P_ ((Lisp_Object, char *, char *)); |
69551
78c97c8a8483
Add prototype for x_display_ok.
Eli Zaretskii <eliz@gnu.org>
parents:
69173
diff
changeset
|
437 extern int x_display_ok P_ ((const char *)); |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
438 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
439 extern Lisp_Object x_list_fonts P_ ((struct frame *, Lisp_Object, int, int)); |
27992
aed40c47cda2
(select_visual): Change prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
27986
diff
changeset
|
440 extern void select_visual P_ ((struct x_display_info *)); |
30321 | 441 extern struct font_info *x_get_font_info P_ ((struct frame *f, int)); |
442 extern struct font_info *x_load_font P_ ((struct frame *, char *, int)); | |
443 extern struct font_info *x_query_font P_ ((struct frame *, char *)); | |
444 extern void x_find_ccl_program P_ ((struct font_info *)); | |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
445 |
12666
47630952226e
(struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents:
12658
diff
changeset
|
446 /* Each X frame object points to its own struct x_output object |
47630952226e
(struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents:
12658
diff
changeset
|
447 in the output_data.x field. The x_output structure contains |
259 | 448 the information that is specific to X windows. */ |
449 | |
12666
47630952226e
(struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents:
12658
diff
changeset
|
450 struct x_output |
259 | 451 { |
11899
e1834fb53c35
(struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents:
11612
diff
changeset
|
452 /* Height of menu bar widget, in pixels. |
e1834fb53c35
(struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents:
11612
diff
changeset
|
453 Zero if not using the X toolkit. |
e1834fb53c35
(struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents:
11612
diff
changeset
|
454 When using the toolkit, this value is not meaningful |
e1834fb53c35
(struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents:
11612
diff
changeset
|
455 if the menubar is turned off. */ |
e1834fb53c35
(struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents:
11612
diff
changeset
|
456 int menubar_height; |
e1834fb53c35
(struct x_display): New field menubar_height.
Karl Heuer <kwzh@gnu.org>
parents:
11612
diff
changeset
|
457 |
49322 | 458 /* Height of tool bar widget, in pixels. |
459 Zero if not using an external tool bar. */ | |
460 int toolbar_height; | |
461 | |
7265
bca3fe63efec
(struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents:
6994
diff
changeset
|
462 /* The tiled border used when the mouse is out of the frame. */ |
259 | 463 Pixmap border_tile; |
464 | |
7265
bca3fe63efec
(struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents:
6994
diff
changeset
|
465 /* Here are the Graphics Contexts for the default font. */ |
259 | 466 GC normal_gc; /* Normal video */ |
467 GC reverse_gc; /* Reverse video */ | |
468 GC cursor_gc; /* cursor drawing */ | |
469 | |
771 | 470 /* The X window used for this frame. |
471 May be zero while the frame object is being created | |
259 | 472 and the X window has not yet been created. */ |
473 Window window_desc; | |
474 | |
475 /* The X window used for the bitmap icon; | |
476 or 0 if we don't have a bitmap icon. */ | |
477 Window icon_desc; | |
478 | |
479 /* The X window that is the parent of this X window. | |
10171
3c022e99daab
(struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents:
9961
diff
changeset
|
480 Usually this is a window that was made by the window manager, |
3c022e99daab
(struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents:
9961
diff
changeset
|
481 but it can be the root window, and it can be explicitly specified |
3c022e99daab
(struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents:
9961
diff
changeset
|
482 (see the explicit_parent field, below). */ |
259 | 483 Window parent_desc; |
484 | |
5656
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
485 #ifdef USE_X_TOOLKIT |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
486 /* The widget of this screen. This is the window of a "shell" widget. */ |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
487 Widget widget; |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
488 /* The XmPanedWindows... */ |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
489 Widget column_widget; |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
490 /* The widget of the edit portion of this screen; the window in |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
491 "window_desc" is inside of this. */ |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
492 Widget edit_widget; |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
493 |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
494 Widget menubar_widget; |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
495 #endif |
94f317eca45d
[USE_X_TOOLKIT]: Include StringDefs.h, IntrinsicP.h,
Richard M. Stallman <rms@gnu.org>
parents:
4711
diff
changeset
|
496 |
49322 | 497 #ifdef USE_GTK |
498 /* The widget of this screen. This is the window of a top widget. */ | |
499 GtkWidget *widget; | |
500 /* The widget of the edit portion of this screen; the window in | |
501 "window_desc" is inside of this. */ | |
502 GtkWidget *edit_widget; | |
503 /* The widget used for laying out widgets vertically. */ | |
504 GtkWidget *vbox_widget; | |
505 /* The menubar in this frame. */ | |
506 GtkWidget *menubar_widget; | |
507 /* The tool bar in this frame */ | |
508 GtkWidget *toolbar_widget; | |
509 /* The handle box that makes the tool bar detachable. */ | |
510 GtkWidget *handlebox_widget; | |
59420
eb72706060ad
* xterm.h (struct x_output): New member, toolbar_detached.
Jan Djärv <jan.h.d@swipnet.se>
parents:
59204
diff
changeset
|
511 /* Non-zero if the tool bar is detached. */ |
eb72706060ad
* xterm.h (struct x_output): New member, toolbar_detached.
Jan Djärv <jan.h.d@swipnet.se>
parents:
59204
diff
changeset
|
512 int toolbar_detached; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
513 |
49322 | 514 /* The last size hints set. */ |
515 GdkGeometry size_hints; | |
516 long hint_flags; | |
517 #endif | |
518 | |
9544
1f8c357797a2
(x_display): Changed icon_bitmap_flag to icon_bitmap.
Richard M. Stallman <rms@gnu.org>
parents:
9259
diff
changeset
|
519 /* If >=0, a bitmap index. The indicated bitmap is used for the |
1f8c357797a2
(x_display): Changed icon_bitmap_flag to icon_bitmap.
Richard M. Stallman <rms@gnu.org>
parents:
9259
diff
changeset
|
520 icon. */ |
1f8c357797a2
(x_display): Changed icon_bitmap_flag to icon_bitmap.
Richard M. Stallman <rms@gnu.org>
parents:
9259
diff
changeset
|
521 int icon_bitmap; |
259 | 522 |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
523 /* Default ASCII font of this frame. */ |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
524 XFontStruct *font; |
259 | 525 |
26878
0020f5359d09
(struct x_output): Change member font_baseline to
Kenichi Handa <handa@m17n.org>
parents:
26792
diff
changeset
|
526 /* The baseline offset of the default ASCII font. */ |
0020f5359d09
(struct x_output): Change member font_baseline to
Kenichi Handa <handa@m17n.org>
parents:
26792
diff
changeset
|
527 int baseline_offset; |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
528 |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
529 /* If a fontset is specified for this frame instead of font, this |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
530 value contains an ID of the fontset, else -1. */ |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
531 int fontset; |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
532 |
259 | 533 /* Pixel values used for various purposes. |
534 border_pixel may be -1 meaning use a gray tile. */ | |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
535 unsigned long background_pixel; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
536 unsigned long foreground_pixel; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
537 unsigned long cursor_pixel; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
538 unsigned long border_pixel; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
539 unsigned long mouse_pixel; |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
540 unsigned long cursor_foreground_pixel; |
259 | 541 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
542 /* Foreground color for scroll bars. A value of -1 means use the |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
543 default (black for non-toolkit scroll bars). */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
544 unsigned long scroll_bar_foreground_pixel; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
545 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
546 /* Background color for scroll bars. A value of -1 means use the |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
547 default (background color of the frame for non-toolkit scroll |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
548 bars). */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
549 unsigned long scroll_bar_background_pixel; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
550 |
39617
d39706d66016
(struct x_output): Add scroll_bar_top_shadow_pixel and
Miles Bader <miles@gnu.org>
parents:
38256
diff
changeset
|
551 /* Top and bottom shadow colors for 3d toolkit scrollbars. -1 means |
d39706d66016
(struct x_output): Add scroll_bar_top_shadow_pixel and
Miles Bader <miles@gnu.org>
parents:
38256
diff
changeset
|
552 let the scroll compute them itself. */ |
d39706d66016
(struct x_output): Add scroll_bar_top_shadow_pixel and
Miles Bader <miles@gnu.org>
parents:
38256
diff
changeset
|
553 unsigned long scroll_bar_top_shadow_pixel; |
d39706d66016
(struct x_output): Add scroll_bar_top_shadow_pixel and
Miles Bader <miles@gnu.org>
parents:
38256
diff
changeset
|
554 unsigned long scroll_bar_bottom_shadow_pixel; |
d39706d66016
(struct x_output): Add scroll_bar_top_shadow_pixel and
Miles Bader <miles@gnu.org>
parents:
38256
diff
changeset
|
555 |
259 | 556 /* Descriptor for the cursor in use for this window. */ |
557 Cursor text_cursor; | |
558 Cursor nontext_cursor; | |
559 Cursor modeline_cursor; | |
50238
20e4ebf5399d
(No_Cursor): Declare as None for X.
Kim F. Storm <storm@cua.dk>
parents:
50152
diff
changeset
|
560 Cursor hand_cursor; |
36254
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
35580
diff
changeset
|
561 Cursor hourglass_cursor; |
33959
4f9560477301
(struct x_output): Add member horizontal_drag_cursor.
Gerd Moellmann <gerd@gnu.org>
parents:
33605
diff
changeset
|
562 Cursor horizontal_drag_cursor; |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
563 |
36254
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
35580
diff
changeset
|
564 /* Window whose cursor is hourglass_cursor. This window is temporarily |
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
35580
diff
changeset
|
565 mapped to display an hourglass cursor. */ |
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
35580
diff
changeset
|
566 Window hourglass_window; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
567 |
36254
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
35580
diff
changeset
|
568 /* Non-zero means hourglass cursor is currently displayed. */ |
f64eaa8f61aa
(struct x_output): Rename busy_cursor to
Gerd Moellmann <gerd@gnu.org>
parents:
35580
diff
changeset
|
569 unsigned hourglass_p : 1; |
259 | 570 |
7265
bca3fe63efec
(struct x_display): New field size_hint_flags.
Richard M. Stallman <rms@gnu.org>
parents:
6994
diff
changeset
|
571 /* Flag to set when the X window needs to be completely repainted. */ |
259 | 572 int needs_exposure; |
573 | |
999 | 574 /* These are the current window manager hints. It seems that |
575 XSetWMHints, when presented with an unset bit in the `flags' | |
576 member of the hints structure, does not leave the corresponding | |
577 attribute unchanged; rather, it resets that attribute to its | |
578 default value. For example, unless you set the `icon_pixmap' | |
579 field and the `IconPixmapHint' bit, XSetWMHints will forget what | |
580 your icon pixmap was. This is rather troublesome, since some of | |
581 the members (for example, `input' and `icon_pixmap') want to stay | |
582 the same throughout the execution of Emacs. So, we keep this | |
583 structure around, just leaving values in it and adding new bits | |
584 to the mask as we go. */ | |
585 XWMHints wm_hints; | |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
586 |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
587 /* This is the Emacs structure for the X display this frame is on. */ |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
588 struct x_display_info *display_info; |
10171
3c022e99daab
(struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents:
9961
diff
changeset
|
589 |
12658
dd26c4fb9999
(struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents:
12275
diff
changeset
|
590 /* This is a button event that wants to activate the menubar. |
15709
32550876ed0f
(struct x_output): Member saved_button_event replaced by
Karl Heuer <kwzh@gnu.org>
parents:
15529
diff
changeset
|
591 We save it here until the command loop gets to think about it. */ |
32550876ed0f
(struct x_output): Member saved_button_event replaced by
Karl Heuer <kwzh@gnu.org>
parents:
15529
diff
changeset
|
592 XEvent *saved_menu_event; |
12658
dd26c4fb9999
(struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents:
12275
diff
changeset
|
593 |
dd26c4fb9999
(struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents:
12275
diff
changeset
|
594 /* This is the widget id used for this frame's menubar in lwlib. */ |
dd26c4fb9999
(struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents:
12275
diff
changeset
|
595 #ifdef USE_X_TOOLKIT |
dd26c4fb9999
(struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents:
12275
diff
changeset
|
596 int id; |
dd26c4fb9999
(struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents:
12275
diff
changeset
|
597 #endif |
dd26c4fb9999
(struct x_display): New fields saved_button_event, id.
Richard M. Stallman <rms@gnu.org>
parents:
12275
diff
changeset
|
598 |
10171
3c022e99daab
(struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents:
9961
diff
changeset
|
599 /* Nonzero means our parent is another application's window |
3c022e99daab
(struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents:
9961
diff
changeset
|
600 and was explicitly specified. */ |
3c022e99daab
(struct x_display): New field explicit_parent.
Richard M. Stallman <rms@gnu.org>
parents:
9961
diff
changeset
|
601 char explicit_parent; |
12191
33e8a9ef3cab
(struct x_display): New field asked_for_visible.
Karl Heuer <kwzh@gnu.org>
parents:
12072
diff
changeset
|
602 |
33e8a9ef3cab
(struct x_display): New field asked_for_visible.
Karl Heuer <kwzh@gnu.org>
parents:
12072
diff
changeset
|
603 /* Nonzero means tried already to make this frame visible. */ |
33e8a9ef3cab
(struct x_display): New field asked_for_visible.
Karl Heuer <kwzh@gnu.org>
parents:
12072
diff
changeset
|
604 char asked_for_visible; |
13226
3b15cf8aa50d
(HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
12666
diff
changeset
|
605 |
18073
460d5452a852
(struct x_output): New field has_been_visible.
Richard M. Stallman <rms@gnu.org>
parents:
17104
diff
changeset
|
606 /* Nonzero if this frame was ever previously visible. */ |
460d5452a852
(struct x_output): New field has_been_visible.
Richard M. Stallman <rms@gnu.org>
parents:
17104
diff
changeset
|
607 char has_been_visible; |
460d5452a852
(struct x_output): New field has_been_visible.
Richard M. Stallman <rms@gnu.org>
parents:
17104
diff
changeset
|
608 |
13226
3b15cf8aa50d
(HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
12666
diff
changeset
|
609 #ifdef HAVE_X_I18N |
3b15cf8aa50d
(HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
12666
diff
changeset
|
610 /* Input context (currently, this means Compose key handler setup). */ |
3b15cf8aa50d
(HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
12666
diff
changeset
|
611 XIC xic; |
27501
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
612 XIMStyle xic_style; |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
613 XFontSet xic_xfs; |
57633
ead4249849ac
* xterm.h (x_output): New member `xic_base_fontname'.
Jan Djärv <jan.h.d@swipnet.se>
parents:
57624
diff
changeset
|
614 char *xic_base_fontname; |
13226
3b15cf8aa50d
(HAVE_X_I18N): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
12666
diff
changeset
|
615 #endif |
1040 | 616 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
617 /* Relief GCs, colors etc. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
618 struct relief |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
619 { |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
620 GC gc; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
621 unsigned long pixel; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
622 int allocated_p; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
623 } |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
624 black_relief, white_relief; |
3883
b9e5a869b33e
Separate parameter faces (those created and modified by the user)
Jim Blandy <jimb@redhat.com>
parents:
3591
diff
changeset
|
625 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
626 /* The background for which the above relief GCs were set up. |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
627 They are changed only when a different background is involved. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
628 unsigned long relief_background; |
38184
ade912ae1484
(struct x_output): Add member wait_for_wm.
Gerd Moellmann <gerd@gnu.org>
parents:
37686
diff
changeset
|
629 |
ade912ae1484
(struct x_output): Add member wait_for_wm.
Gerd Moellmann <gerd@gnu.org>
parents:
37686
diff
changeset
|
630 /* Xt waits for a ConfigureNotify event from the window manager in |
ade912ae1484
(struct x_output): Add member wait_for_wm.
Gerd Moellmann <gerd@gnu.org>
parents:
37686
diff
changeset
|
631 EmacsFrameSetCharSize when the shell widget is resized. For some |
ade912ae1484
(struct x_output): Add member wait_for_wm.
Gerd Moellmann <gerd@gnu.org>
parents:
37686
diff
changeset
|
632 window managers like fvwm2 2.2.5 and KDE 2.1 this event doesn't |
ade912ae1484
(struct x_output): Add member wait_for_wm.
Gerd Moellmann <gerd@gnu.org>
parents:
37686
diff
changeset
|
633 arrive for an unknown reason and Emacs hangs in Xt. If this is |
ade912ae1484
(struct x_output): Add member wait_for_wm.
Gerd Moellmann <gerd@gnu.org>
parents:
37686
diff
changeset
|
634 zero, tell Xt not to wait. */ |
ade912ae1484
(struct x_output): Add member wait_for_wm.
Gerd Moellmann <gerd@gnu.org>
parents:
37686
diff
changeset
|
635 int wait_for_wm; |
42724
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
636 |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
637 /* As x_pixels_diff, but to FRAME_OUTER_WINDOW. For some reason the |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
638 two might differ by a pixel, depending on WM */ |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
639 int x_pixels_outer_diff; |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
640 |
42724
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
641 /* As y_pixels_diff, but to FRAME_OUTER_WINDOW. In the toolkit version, |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
642 these may differ because this does not take into account possible |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
643 menubar. y_pixels_diff is with menubar height included */ |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
644 int y_pixels_outer_diff; |
46075
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
645 |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
646 /* Keep track of focus. May be EXPLICIT if we received a FocusIn for this |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
647 frame, or IMPLICIT if we received an EnterNotify. |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
648 FocusOut and LeaveNotify clears EXPLICIT/IMPLICIT. */ |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
649 int focus_state; |
52752
751a01f97570
Make (modify-frame-parameters nil '((top . 0))) work for all types
Jan Djärv <jan.h.d@swipnet.se>
parents:
52401
diff
changeset
|
650 |
52754
d08832a11cfd
* w32term.c (w32_read_socket): Remove call to x_check_fullscreen_move,
Jan Djärv <jan.h.d@swipnet.se>
parents:
52752
diff
changeset
|
651 /* The offset we need to add to compensate for type A WMs. */ |
d08832a11cfd
* w32term.c (w32_read_socket): Remove call to x_check_fullscreen_move,
Jan Djärv <jan.h.d@swipnet.se>
parents:
52752
diff
changeset
|
652 int move_offset_top; |
d08832a11cfd
* w32term.c (w32_read_socket): Remove call to x_check_fullscreen_move,
Jan Djärv <jan.h.d@swipnet.se>
parents:
52752
diff
changeset
|
653 int move_offset_left; |
d08832a11cfd
* w32term.c (w32_read_socket): Remove call to x_check_fullscreen_move,
Jan Djärv <jan.h.d@swipnet.se>
parents:
52752
diff
changeset
|
654 |
71367
030275d8610f
2006-06-16 Francis Litterio <flitterio@gmail.com>
Jan Djärv <jan.h.d@swipnet.se>
parents:
70847
diff
changeset
|
655 /* The frame's left/top offsets before we call XMoveWindow. See |
030275d8610f
2006-06-16 Francis Litterio <flitterio@gmail.com>
Jan Djärv <jan.h.d@swipnet.se>
parents:
70847
diff
changeset
|
656 x_check_expected_move. */ |
030275d8610f
2006-06-16 Francis Litterio <flitterio@gmail.com>
Jan Djärv <jan.h.d@swipnet.se>
parents:
70847
diff
changeset
|
657 int left_before_move; |
030275d8610f
2006-06-16 Francis Litterio <flitterio@gmail.com>
Jan Djärv <jan.h.d@swipnet.se>
parents:
70847
diff
changeset
|
658 int top_before_move; |
42724
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
659 }; |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
660 |
50238
20e4ebf5399d
(No_Cursor): Declare as None for X.
Kim F. Storm <storm@cua.dk>
parents:
50152
diff
changeset
|
661 #define No_Cursor (None) |
20e4ebf5399d
(No_Cursor): Declare as None for X.
Kim F. Storm <storm@cua.dk>
parents:
50152
diff
changeset
|
662 |
42724
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
663 enum |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
664 { |
46075
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
665 /* Values for focus_state, used as bit mask. |
49117 | 666 EXPLICIT means we received a FocusIn for the frame and know it has |
46075
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
667 the focus. IMPLICIT means we recevied an EnterNotify and the frame |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
668 may have the focus if no window manager is running. |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
669 FocusOut and LeaveNotify clears EXPLICIT/IMPLICIT. */ |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
670 FOCUS_NONE = 0, |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
671 FOCUS_IMPLICIT = 1, |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
672 FOCUS_EXPLICIT = 2 |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
673 }; |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
674 |
39e3c9d9b655
(struct x_output): Add focus_state.
Jan Djärv <jan.h.d@swipnet.se>
parents:
45804
diff
changeset
|
675 |
50152
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
676 /* Return the X output data for frame F. */ |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
677 #define FRAME_X_OUTPUT(f) ((f)->output_data.x) |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
678 |
22934
c3b29b916c9c
(FRAME_OUTER_WINDOW): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
21547
diff
changeset
|
679 /* Return the X window used for displaying data in frame F. */ |
12666
47630952226e
(struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents:
12658
diff
changeset
|
680 #define FRAME_X_WINDOW(f) ((f)->output_data.x->window_desc) |
1040 | 681 |
22934
c3b29b916c9c
(FRAME_OUTER_WINDOW): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
21547
diff
changeset
|
682 /* Return the outermost X window associated with the frame F. */ |
c3b29b916c9c
(FRAME_OUTER_WINDOW): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
21547
diff
changeset
|
683 #ifdef USE_X_TOOLKIT |
42724
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
684 #define FRAME_OUTER_WINDOW(f) ((f)->output_data.x->widget ? \ |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
685 XtWindow ((f)->output_data.x->widget) : \ |
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
686 FRAME_X_WINDOW (f)) |
22934
c3b29b916c9c
(FRAME_OUTER_WINDOW): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
21547
diff
changeset
|
687 #else |
49322 | 688 #ifdef USE_GTK |
689 #define GTK_WIDGET_TO_X_WIN(w) \ | |
690 ((w) && (w)->window ? GDK_WINDOW_XWINDOW ((w)->window) : 0) | |
691 | |
692 #define FRAME_GTK_OUTER_WIDGET(f) ((f)->output_data.x->widget) | |
693 #define FRAME_GTK_WIDGET(f) ((f)->output_data.x->edit_widget) | |
694 #define FRAME_OUTER_WINDOW(f) \ | |
695 (FRAME_GTK_OUTER_WIDGET (f) ? \ | |
696 GTK_WIDGET_TO_X_WIN (FRAME_GTK_OUTER_WIDGET (f)) : \ | |
697 FRAME_X_WINDOW (f)) | |
698 | |
699 #else /* !USE_GTK */ | |
22934
c3b29b916c9c
(FRAME_OUTER_WINDOW): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
21547
diff
changeset
|
700 #define FRAME_OUTER_WINDOW(f) (FRAME_X_WINDOW (f)) |
49322 | 701 #endif /* !USE_GTK */ |
22934
c3b29b916c9c
(FRAME_OUTER_WINDOW): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
21547
diff
changeset
|
702 #endif |
c3b29b916c9c
(FRAME_OUTER_WINDOW): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
21547
diff
changeset
|
703 |
49322 | 704 |
12666
47630952226e
(struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents:
12658
diff
changeset
|
705 #define FRAME_FONT(f) ((f)->output_data.x->font) |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
706 #define FRAME_FONTSET(f) ((f)->output_data.x->fontset) |
27501
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
707 #define FRAME_MENUBAR_HEIGHT(f) ((f)->output_data.x->menubar_height) |
49322 | 708 #define FRAME_TOOLBAR_HEIGHT(f) ((f)->output_data.x->toolbar_height) |
50152
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
709 #define FRAME_BASELINE_OFFSET(f) ((f)->output_data.x->baseline_offset) |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
710 |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
711 /* This gives the x_display_info structure for the display F is on. */ |
12666
47630952226e
(struct x_output): Renamed from struct x_display.
Richard M. Stallman <rms@gnu.org>
parents:
12658
diff
changeset
|
712 #define FRAME_X_DISPLAY_INFO(f) ((f)->output_data.x->display_info) |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
713 |
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
714 /* This is the `Display *' which frame F is on. */ |
9655
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
715 #define FRAME_X_DISPLAY(f) (FRAME_X_DISPLAY_INFO (f)->display) |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
716 |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
717 /* This is the `Screen *' which frame F is on. */ |
93ccc7bbae8a
(struct x_display_info): Struct renamed from x_screen.
Richard M. Stallman <rms@gnu.org>
parents:
9547
diff
changeset
|
718 #define FRAME_X_SCREEN(f) (FRAME_X_DISPLAY_INFO (f)->screen) |
37254
9ace5acd0d74
(FRAME_X_SCREEN_NUMBER): New macro.
Gerd Moellmann <gerd@gnu.org>
parents:
36586
diff
changeset
|
719 #define FRAME_X_SCREEN_NUMBER(f) XScreenNumberOfScreen (FRAME_X_SCREEN (f)) |
9013
0ab80494b155
(FRAME_X_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
8947
diff
changeset
|
720 |
27986
8cc3bff16c28
(struct x_display_info): Add Colormap member `cmap'.
Gerd Moellmann <gerd@gnu.org>
parents:
27501
diff
changeset
|
721 /* This is the Visual which frame F is on. */ |
8cc3bff16c28
(struct x_display_info): Add Colormap member `cmap'.
Gerd Moellmann <gerd@gnu.org>
parents:
27501
diff
changeset
|
722 #define FRAME_X_VISUAL(f) FRAME_X_DISPLAY_INFO (f)->visual |
8cc3bff16c28
(struct x_display_info): Add Colormap member `cmap'.
Gerd Moellmann <gerd@gnu.org>
parents:
27501
diff
changeset
|
723 |
8cc3bff16c28
(struct x_display_info): Add Colormap member `cmap'.
Gerd Moellmann <gerd@gnu.org>
parents:
27501
diff
changeset
|
724 /* This is the Colormap which frame F uses. */ |
8cc3bff16c28
(struct x_display_info): Add Colormap member `cmap'.
Gerd Moellmann <gerd@gnu.org>
parents:
27501
diff
changeset
|
725 #define FRAME_X_COLORMAP(f) FRAME_X_DISPLAY_INFO (f)->cmap |
8cc3bff16c28
(struct x_display_info): Add Colormap member `cmap'.
Gerd Moellmann <gerd@gnu.org>
parents:
27501
diff
changeset
|
726 |
17051
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
727 /* This is the 'font_info *' which frame F has. */ |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
728 #define FRAME_X_FONT_TABLE(f) (FRAME_X_DISPLAY_INFO (f)->font_table) |
fd0b17a79b07
(struct font_info): This definition is moved to
Karl Heuer <kwzh@gnu.org>
parents:
16268
diff
changeset
|
729 |
49117 | 730 /* The difference in pixels between the top left corner of the |
731 Emacs window (including possible window manager decorations) | |
732 and FRAME_X_WINDOW (f). */ | |
733 #define FRAME_OUTER_TO_INNER_DIFF_X(f) \ | |
734 ((f)->output_data.x->x_pixels_outer_diff) | |
735 #define FRAME_OUTER_TO_INNER_DIFF_Y(f) \ | |
736 ((f)->output_data.x->y_pixels_outer_diff \ | |
49322 | 737 + FRAME_MENUBAR_HEIGHT (f) + FRAME_TOOLBAR_HEIGHT (f)) |
49117 | 738 |
739 | |
13315
2edc6ae38a78
(FRAME_XIC): Fix wrong field name.
Richard M. Stallman <rms@gnu.org>
parents:
13226
diff
changeset
|
740 #define FRAME_XIC(f) ((f)->output_data.x->xic) |
27501
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
741 #define FRAME_X_XIM(f) (FRAME_X_DISPLAY_INFO (f)->xim) |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
742 #define FRAME_X_XIM_STYLES(f) (FRAME_X_DISPLAY_INFO (f)->xim_styles) |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
743 #define FRAME_XIC_STYLE(f) ((f)->output_data.x->xic_style) |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
744 #define FRAME_XIC_FONTSET(f) ((f)->output_data.x->xic_xfs) |
57633
ead4249849ac
* xterm.h (x_output): New member `xic_base_fontname'.
Jan Djärv <jan.h.d@swipnet.se>
parents:
57624
diff
changeset
|
745 #define FRAME_XIC_BASE_FONTNAME(f) ((f)->output_data.x->xic_base_fontname) |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
746 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
747 /* Value is the smallest width of any character in any font on frame F. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
748 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
749 #define FRAME_SMALLEST_CHAR_WIDTH(F) \ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
750 FRAME_X_DISPLAY_INFO(F)->smallest_char_width |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
751 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
752 /* Value is the smallest height of any font on frame F. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
753 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
754 #define FRAME_SMALLEST_FONT_HEIGHT(F) \ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
755 FRAME_X_DISPLAY_INFO(F)->smallest_font_height |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
756 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
757 /* Return a pointer to the image cache of frame F. */ |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
758 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
759 #define FRAME_X_IMAGE_CACHE(F) FRAME_X_DISPLAY_INFO ((F))->image_cache |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
760 |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
761 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
762 /* X-specific scroll bar stuff. */ |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
763 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
764 /* We represent scroll bars as lisp vectors. This allows us to place |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
765 references to them in windows without worrying about whether we'll |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
766 end up with windows referring to dead scroll bars; the garbage |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
767 collector will free it when its time comes. |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
768 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
769 We use struct scroll_bar as a template for accessing fields of the |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
770 vector. */ |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
771 |
33605
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
772 struct scroll_bar |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
773 { |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
774 /* These fields are shared by all vectors. */ |
8837
a48847852901
(struct scroll_bar, SCROLL_BAR_VEC_SIZE): Use EMACS_INT.
Richard M. Stallman <rms@gnu.org>
parents:
7307
diff
changeset
|
775 EMACS_INT size_from_Lisp_Vector_struct; |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
776 struct Lisp_Vector *next_from_Lisp_Vector_struct; |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
777 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
778 /* The window we're a scroll bar for. */ |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
779 Lisp_Object window; |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
780 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
781 /* The next and previous in the chain of scroll bars in this frame. */ |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
782 Lisp_Object next, prev; |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
783 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
784 /* The X window representing this scroll bar. Since this is a full |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
785 32-bit quantity, we store it split into two 32-bit values. */ |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
786 Lisp_Object x_window_low, x_window_high; |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
787 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
788 /* The position and size of the scroll bar in pixels, relative to the |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
789 frame. */ |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
790 Lisp_Object top, left, width, height; |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
791 |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
792 /* The starting and ending positions of the handle, relative to the |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
793 handle area (i.e. zero is the top position, not |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
794 SCROLL_BAR_TOP_BORDER). If they're equal, that means the handle |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
795 hasn't been drawn yet. |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
796 |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
797 These are not actually the locations where the beginning and end |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
798 are drawn; in order to keep handles from becoming invisible when |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
799 editing large files, we establish a minimum height by always |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
800 drawing handle bottoms VERTICAL_SCROLL_BAR_MIN_HANDLE pixels below |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
801 where they would be normally; the bottom and top are in a |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
802 different co-ordinate system. */ |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
803 Lisp_Object start, end; |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
804 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
805 /* If the scroll bar handle is currently being dragged by the user, |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
806 this is the number of pixels from the top of the handle to the |
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
807 place where the user grabbed it. If the handle isn't currently |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
808 being dragged, this is Qnil. */ |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
809 Lisp_Object dragging; |
82173
bfb968b72892
(struct scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
82140
diff
changeset
|
810 |
bfb968b72892
(struct scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
82140
diff
changeset
|
811 #ifdef USE_TOOLKIT_SCROLL_BARS |
bfb968b72892
(struct scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
82140
diff
changeset
|
812 /* t if the background of the fringe that is adjacent to a scroll |
bfb968b72892
(struct scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
82140
diff
changeset
|
813 bar is extended to the gap between the fringe and the bar. */ |
bfb968b72892
(struct scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
82140
diff
changeset
|
814 Lisp_Object fringe_extended_p; |
bfb968b72892
(struct scroll_bar) [USE_TOOLKIT_SCROLL_BARS]:
YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
parents:
82140
diff
changeset
|
815 #endif |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
816 }; |
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
817 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
818 /* The number of elements a vector holding a struct scroll_bar needs. */ |
9961
5ecf054a8c8f
(XSCROLL_BAR): Extract from Lisp_Vector, not generic pointer.
Karl Heuer <kwzh@gnu.org>
parents:
9692
diff
changeset
|
819 #define SCROLL_BAR_VEC_SIZE \ |
5ecf054a8c8f
(XSCROLL_BAR): Extract from Lisp_Vector, not generic pointer.
Karl Heuer <kwzh@gnu.org>
parents:
9692
diff
changeset
|
820 ((sizeof (struct scroll_bar) \ |
5ecf054a8c8f
(XSCROLL_BAR): Extract from Lisp_Vector, not generic pointer.
Karl Heuer <kwzh@gnu.org>
parents:
9692
diff
changeset
|
821 - sizeof (EMACS_INT) - sizeof (struct Lisp_Vector *)) \ |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
822 / sizeof (Lisp_Object)) |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
823 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
824 /* Turning a lisp vector value into a pointer to a struct scroll_bar. */ |
9961
5ecf054a8c8f
(XSCROLL_BAR): Extract from Lisp_Vector, not generic pointer.
Karl Heuer <kwzh@gnu.org>
parents:
9692
diff
changeset
|
825 #define XSCROLL_BAR(vec) ((struct scroll_bar *) XVECTOR (vec)) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
826 |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
827 |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
828 /* Building a 32-bit C integer from two 16-bit lisp integers. */ |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
829 #define SCROLL_BAR_PACK(low, high) (XINT (high) << 16 | XINT (low)) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
830 |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
831 /* Setting two lisp integers to the low and high words of a 32-bit C int. */ |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
832 #define SCROLL_BAR_UNPACK(low, high, int32) \ |
9259
df555d80f093
(SCROLL_BAR_UNPACK): Use new accessor macros instead of calling XSET directly.
Karl Heuer <kwzh@gnu.org>
parents:
9168
diff
changeset
|
833 (XSETINT ((low), (int32) & 0xffff), \ |
df555d80f093
(SCROLL_BAR_UNPACK): Use new accessor macros instead of calling XSET directly.
Karl Heuer <kwzh@gnu.org>
parents:
9168
diff
changeset
|
834 XSETINT ((high), ((int32) >> 16) & 0xffff)) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
835 |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
836 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
837 /* Extract the X window id of the scroll bar from a struct scroll_bar. */ |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
838 #define SCROLL_BAR_X_WINDOW(ptr) \ |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
839 ((Window) SCROLL_BAR_PACK ((ptr)->x_window_low, (ptr)->x_window_high)) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
840 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
841 /* Store a window id in a struct scroll_bar. */ |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
842 #define SET_SCROLL_BAR_X_WINDOW(ptr, id) \ |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
843 (SCROLL_BAR_UNPACK ((ptr)->x_window_low, (ptr)->x_window_high, (int) id)) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
844 |
33605
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
845 /* Extract the X widget of the scroll bar from a struct scroll_bar. |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
846 XtWindowToWidget should be fast enough since Xt uses a hash table |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
847 to map windows to widgets. */ |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
848 |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
849 #define SCROLL_BAR_X_WIDGET(dpy, ptr) \ |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
850 XtWindowToWidget (dpy, SCROLL_BAR_X_WINDOW (ptr)) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
851 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
852 /* Store a widget id in a struct scroll_bar. */ |
33605
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
853 |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
854 #define SET_SCROLL_BAR_X_WIDGET(ptr, w) \ |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
855 do { \ |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
856 Window window = XtWindow (w); \ |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
857 SET_SCROLL_BAR_X_WINDOW (ptr, window); \ |
f41b5f5154b1
(struct scroll_bar): Members x_widget_low, x_widget_high
Gerd Moellmann <gerd@gnu.org>
parents:
32608
diff
changeset
|
858 } while (0) |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
859 |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
860 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
861 /* Return the inside width of a vertical scroll bar, given the outside |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
862 width. */ |
16252
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
863 #define VERTICAL_SCROLL_BAR_INSIDE_WIDTH(f, width) \ |
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
864 ((width) \ |
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
865 - VERTICAL_SCROLL_BAR_LEFT_BORDER \ |
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
866 - VERTICAL_SCROLL_BAR_RIGHT_BORDER \ |
16268
eed1157f0587
(VERTICAL_SCROLL_BAR_WIDTH_TRIM): Renamed from
Richard M. Stallman <rms@gnu.org>
parents:
16252
diff
changeset
|
867 - VERTICAL_SCROLL_BAR_WIDTH_TRIM * 2) |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
868 |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
869 /* Return the length of the rectangle within which the top of the |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
870 handle must stay. This isn't equivalent to the inside height, |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
49434
diff
changeset
|
871 because the scroll bar handle has a minimum height. |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
872 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
873 This is the real range of motion for the scroll bar, so when we're |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
874 scaling buffer positions to scroll bar positions, we use this, not |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
875 VERTICAL_SCROLL_BAR_INSIDE_HEIGHT. */ |
16252
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
876 #define VERTICAL_SCROLL_BAR_TOP_RANGE(f, height) \ |
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
877 (VERTICAL_SCROLL_BAR_INSIDE_HEIGHT (f, height) - VERTICAL_SCROLL_BAR_MIN_HANDLE) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
878 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
879 /* Return the inside height of vertical scroll bar, given the outside |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
880 height. See VERTICAL_SCROLL_BAR_TOP_RANGE too. */ |
16252
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
881 #define VERTICAL_SCROLL_BAR_INSIDE_HEIGHT(f, height) \ |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
882 ((height) - VERTICAL_SCROLL_BAR_TOP_BORDER - VERTICAL_SCROLL_BAR_BOTTOM_BORDER) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
883 |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
884 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
885 /* Border widths for scroll bars. |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
886 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
887 Scroll bar windows don't have any X borders; their border width is |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
888 set to zero, and we redraw borders ourselves. This makes the code |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
889 a bit cleaner, since we don't have to convert between outside width |
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
890 (used when relating to the rest of the screen) and inside width |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
891 (used when sizing and drawing the scroll bar window itself). |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
892 |
3591
507f64624555
Apply typo patches from Paul Eggert.
Jim Blandy <jimb@redhat.com>
parents:
3195
diff
changeset
|
893 The handle moves up and down/back and forth in a rectangle inset |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
894 from the edges of the scroll bar. These are widths by which we |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
895 inset the handle boundaries from the scroll bar edges. */ |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
896 #define VERTICAL_SCROLL_BAR_LEFT_BORDER (2) |
6357
fb5923ece02c
(VERTICAL_SCROLL_BAR_RIGHT_BORDER): Change from 3 to 2.
Karl Heuer <kwzh@gnu.org>
parents:
5946
diff
changeset
|
897 #define VERTICAL_SCROLL_BAR_RIGHT_BORDER (2) |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
898 #define VERTICAL_SCROLL_BAR_TOP_BORDER (2) |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
899 #define VERTICAL_SCROLL_BAR_BOTTOM_BORDER (2) |
1788
aaccd635fb71
Make scrollbar structures into lisp objects, so that they can be
Jim Blandy <jimb@redhat.com>
parents:
1721
diff
changeset
|
900 |
1994
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
901 /* Minimum lengths for scroll bar handles, in pixels. */ |
73ce9dd21093
Use the term `scroll bar', instead of `scrollbar'.
Jim Blandy <jimb@redhat.com>
parents:
1821
diff
changeset
|
902 #define VERTICAL_SCROLL_BAR_MIN_HANDLE (5) |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
903 |
16268
eed1157f0587
(VERTICAL_SCROLL_BAR_WIDTH_TRIM): Renamed from
Richard M. Stallman <rms@gnu.org>
parents:
16252
diff
changeset
|
904 /* Trimming off a few pixels from each side prevents |
16252
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
905 text from glomming up against the scroll bar */ |
25496
c19107a5df88
(VERTICAL_SCROLL_BAR_WIDTH_TRIM): Change from 2 to 0.
Gerd Moellmann <gerd@gnu.org>
parents:
25466
diff
changeset
|
906 #define VERTICAL_SCROLL_BAR_WIDTH_TRIM (0) |
16252
41c962c84de5
(VERTICAL_SCROLL_BAR_INSIDE_WIDTH): Add frame as an
Richard M. Stallman <rms@gnu.org>
parents:
16049
diff
changeset
|
907 |
1721
6ba3bca4c3de
* frame.h (struct frame): New fields `can_have_scrollbars' and
Jim Blandy <jimb@redhat.com>
parents:
1531
diff
changeset
|
908 |
45804 | 909 /* If a struct input_event has a kind which is SELECTION_REQUEST_EVENT |
910 or SELECTION_CLEAR_EVENT, then its contents are really described | |
2196
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
911 by this structure. */ |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
912 |
45804 | 913 /* For an event of kind SELECTION_REQUEST_EVENT, |
14164 | 914 this structure really describes the contents. |
915 **Don't make this struct longer!** | |
916 If it overlaps the frame_or_window field of struct input_event, | |
917 that will cause GC to crash. */ | |
2196
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
918 struct selection_input_event |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
919 { |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
920 int kind; |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
921 Display *display; |
14030 | 922 /* We spell it with an "o" here because X does. */ |
923 Window requestor; | |
2196
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
924 Atom selection, target, property; |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
925 Time time; |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
926 }; |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
927 |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
928 #define SELECTION_EVENT_DISPLAY(eventp) \ |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
929 (((struct selection_input_event *) (eventp))->display) |
14030 | 930 /* We spell it with an "o" here because X does. */ |
931 #define SELECTION_EVENT_REQUESTOR(eventp) \ | |
932 (((struct selection_input_event *) (eventp))->requestor) | |
2196
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
933 #define SELECTION_EVENT_SELECTION(eventp) \ |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
934 (((struct selection_input_event *) (eventp))->selection) |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
935 #define SELECTION_EVENT_TARGET(eventp) \ |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
936 (((struct selection_input_event *) (eventp))->target) |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
937 #define SELECTION_EVENT_PROPERTY(eventp) \ |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
938 (((struct selection_input_event *) (eventp))->property) |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
939 #define SELECTION_EVENT_TIME(eventp) \ |
75e1f1ee83ad
(SELECTION_EVENT_DISPLAY): New macro.
Richard M. Stallman <rms@gnu.org>
parents:
1994
diff
changeset
|
940 (((struct selection_input_event *) (eventp))->time) |
3077
8bba60752a32
* xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents:
2841
diff
changeset
|
941 |
8bba60752a32
* xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents:
2841
diff
changeset
|
942 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
943 struct window; |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
944 struct glyph_matrix; |
21515 | 945 struct frame; |
946 struct input_event; | |
28784
072a2799136b
(struct face): Add forward declaration.
Gerd Moellmann <gerd@gnu.org>
parents:
28353
diff
changeset
|
947 struct face; |
072a2799136b
(struct face): Add forward declaration.
Gerd Moellmann <gerd@gnu.org>
parents:
28353
diff
changeset
|
948 struct image; |
21515 | 949 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
950 /* From xselect.c. */ |
3077
8bba60752a32
* xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents:
2841
diff
changeset
|
951 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
952 void x_handle_selection_notify P_ ((XSelectionEvent *)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
953 void x_handle_property_notify P_ ((XPropertyEvent *)); |
3077
8bba60752a32
* xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents:
2841
diff
changeset
|
954 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
955 /* From xfns.c. */ |
3077
8bba60752a32
* xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents:
2841
diff
changeset
|
956 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
957 Lisp_Object display_x_get_resource P_ ((struct x_display_info *, |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
958 Lisp_Object, Lisp_Object, |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
959 Lisp_Object, Lisp_Object)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
960 struct frame *check_x_frame P_ ((Lisp_Object)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
961 EXFUN (Fx_display_color_p, 1); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
962 EXFUN (Fx_display_grayscale_p, 1); |
34320
61c2da7c4adf
(x_free_gcs): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
33959
diff
changeset
|
963 extern void x_free_gcs P_ ((struct frame *)); |
3077
8bba60752a32
* xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents:
2841
diff
changeset
|
964 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
965 /* From xrdb.c. */ |
3077
8bba60752a32
* xterm.h: New section for declarations for xfaces.c.
Jim Blandy <jimb@redhat.com>
parents:
2841
diff
changeset
|
966 |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
967 char *x_get_customization_string P_ ((XrmDatabase, char *, char *)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
968 XrmDatabase x_load_resources P_ ((Display *, char *, char *, char *)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
969 int x_get_resource P_ ((XrmDatabase, char *, char *, |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
970 XrmRepresentation, XrmValue *)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
971 void x_delete_display P_ ((struct x_display_info *)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
972 void x_make_frame_visible P_ ((struct frame *)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
973 void x_iconify_frame P_ ((struct frame *)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
974 void x_wm_set_size_hint P_ ((struct frame *, long, int)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
975 int x_text_icon P_ ((struct frame *, char *)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
976 int x_bitmap_icon P_ ((struct frame *, Lisp_Object)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
977 void x_set_window_size P_ ((struct frame *, int, int, int)); |
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
978 void x_wm_set_window_state P_ ((struct frame *, int)); |
25530
2b059707aa22
Change protorype of x_alloc_nearest_color.
Gerd Moellmann <gerd@gnu.org>
parents:
25496
diff
changeset
|
979 int x_alloc_nearest_color P_ ((struct frame *, Colormap, XColor *)); |
21515 | 980 |
981 /* Defined in xterm.c */ | |
982 | |
983 extern void cancel_mouse_face P_ ((struct frame *)); | |
984 extern void x_scroll_bar_clear P_ ((struct frame *)); | |
985 extern int x_text_icon P_ ((struct frame *, char *)); | |
986 extern int x_bitmap_icon P_ ((struct frame *, Lisp_Object)); | |
69152
f2147c1027b6
* xterm.h (x_catch_errors) Return value changed to void.
Chong Yidong <cyd@stupidchicken.com>
parents:
68873
diff
changeset
|
987 extern void x_catch_errors P_ ((Display *)); |
21515 | 988 extern void x_check_errors P_ ((Display *, char *)); |
989 extern int x_had_errors_p P_ ((Display *)); | |
70847
ca93fd3c0c65
* xterm.h: Add extern declarations for x_clear_errors,
Jan Djärv <jan.h.d@swipnet.se>
parents:
69551
diff
changeset
|
990 extern int x_catching_errors P_ ((void)); |
69173
fdee8318ddc9
* xterm.h, xterm.c (x_uncatch_errors): Delete unneccessary
Chong Yidong <cyd@stupidchicken.com>
parents:
69152
diff
changeset
|
991 extern void x_uncatch_errors P_ ((void)); |
70847
ca93fd3c0c65
* xterm.h: Add extern declarations for x_clear_errors,
Jan Djärv <jan.h.d@swipnet.se>
parents:
69551
diff
changeset
|
992 extern void x_clear_errors P_ ((Display *)); |
ca93fd3c0c65
* xterm.h: Add extern declarations for x_clear_errors,
Jan Djärv <jan.h.d@swipnet.se>
parents:
69551
diff
changeset
|
993 extern void x_fully_uncatch_errors P_ ((void)); |
21515 | 994 extern void x_set_window_size P_ ((struct frame *, int, int, int)); |
995 extern void x_set_mouse_position P_ ((struct frame *, int, int)); | |
996 extern void x_set_mouse_pixel_position P_ ((struct frame *, int, int)); | |
81949
f3024bc83300
Declare x_ewmh_activate_frame
Jan Djärv <jan.h.d@swipnet.se>
parents:
75348
diff
changeset
|
997 extern void x_ewmh_activate_frame P_ ((struct frame *)); |
21515 | 998 extern void x_raise_frame P_ ((struct frame *)); |
999 extern void x_lower_frame P_ ((struct frame *)); | |
1000 extern void x_make_frame_visible P_ ((struct frame *)); | |
1001 extern void x_make_frame_invisible P_ ((struct frame *)); | |
1002 extern void x_iconify_frame P_ ((struct frame *)); | |
34525
6a10bf66e0c5
(x_free_frame_resources): Declare.
Gerd Moellmann <gerd@gnu.org>
parents:
34320
diff
changeset
|
1003 extern void x_free_frame_resources P_ ((struct frame *)); |
21515 | 1004 extern void x_destroy_window P_ ((struct frame *)); |
1005 extern void x_wm_set_size_hint P_ ((struct frame *, long, int)); | |
1006 extern void x_wm_set_window_state P_ ((struct frame *, int)); | |
1007 extern void x_wm_set_icon_pixmap P_ ((struct frame *, int)); | |
1008 extern void x_delete_display P_ ((struct x_display_info *)); | |
1009 extern void x_initialize P_ ((void)); | |
28353
5246aef1c8e1
(x_specified_cursor_type, x_copy_color): Add prototypes.
Gerd Moellmann <gerd@gnu.org>
parents:
28146
diff
changeset
|
1010 extern unsigned long x_copy_color P_ ((struct frame *, unsigned long)); |
29867
1c42f2313b4f
(Xt_app_con): External declaration.
Gerd Moellmann <gerd@gnu.org>
parents:
29780
diff
changeset
|
1011 #ifdef USE_X_TOOLKIT |
1c42f2313b4f
(Xt_app_con): External declaration.
Gerd Moellmann <gerd@gnu.org>
parents:
29780
diff
changeset
|
1012 extern XtAppContext Xt_app_con; |
70847
ca93fd3c0c65
* xterm.h: Add extern declarations for x_clear_errors,
Jan Djärv <jan.h.d@swipnet.se>
parents:
69551
diff
changeset
|
1013 extern int x_alloc_lighter_color_for_widget __P ((Widget, Display*, Colormap, |
ca93fd3c0c65
* xterm.h: Add extern declarations for x_clear_errors,
Jan Djärv <jan.h.d@swipnet.se>
parents:
69551
diff
changeset
|
1014 unsigned long *, |
ca93fd3c0c65
* xterm.h: Add extern declarations for x_clear_errors,
Jan Djärv <jan.h.d@swipnet.se>
parents:
69551
diff
changeset
|
1015 double, int)); |
72854
f295b430aa3a
* xterm.c (x_initialize): Don't install Xt event timer here.
Chong Yidong <cyd@stupidchicken.com>
parents:
72353
diff
changeset
|
1016 extern void x_activate_timeout_atimer P_ ((void)); |
29867
1c42f2313b4f
(Xt_app_con): External declaration.
Gerd Moellmann <gerd@gnu.org>
parents:
29780
diff
changeset
|
1017 #endif |
32608
0c09f18456e3
(struct x_display_info): Add color_cells and ncolor_cells.
Gerd Moellmann <gerd@gnu.org>
parents:
30353
diff
changeset
|
1018 extern void x_query_colors P_ ((struct frame *f, XColor *, int)); |
0c09f18456e3
(struct x_display_info): Add color_cells and ncolor_cells.
Gerd Moellmann <gerd@gnu.org>
parents:
30353
diff
changeset
|
1019 extern void x_query_color P_ ((struct frame *f, XColor *)); |
35580
ff5045d1af58
(x_clear_area): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
34525
diff
changeset
|
1020 extern void x_clear_area P_ ((Display *, Window, int, int, int, int, int)); |
65713
ad24f42046b1
* xlwmenu.c (find_next_selectable):
Dan Nicolaescu <dann@ics.uci.edu>
parents:
65460
diff
changeset
|
1021 extern void set_vertical_scroll_bar P_ ((struct window *)); |
21515 | 1022 |
49434
a4d0ee33dcce
Fix input methods for GTK.
Jan Djärv <jan.h.d@swipnet.se>
parents:
49322
diff
changeset
|
1023 extern int x_dispatch_event P_ ((XEvent *, Display *)); |
68873
9f090604bd9a
* xterm.h: Declare x_x_to_emacs_modifiers.
Jan Djärv <jan.h.d@swipnet.se>
parents:
68667
diff
changeset
|
1024 extern unsigned int x_x_to_emacs_modifiers P_ ((struct x_display_info *, |
9f090604bd9a
* xterm.h: Declare x_x_to_emacs_modifiers.
Jan Djärv <jan.h.d@swipnet.se>
parents:
68667
diff
changeset
|
1025 unsigned)); |
42724
6d3fb8c8283b
(struct x_output): New members want_fullscreen,
Eli Zaretskii <eliz@gnu.org>
parents:
41720
diff
changeset
|
1026 |
21515 | 1027 /* Defined in xselect.c */ |
1028 | |
1029 extern void x_handle_property_notify P_ ((XPropertyEvent *)); | |
1030 extern void x_handle_selection_notify P_ ((XSelectionEvent *)); | |
57954
328dc625a959
(x_start_queuing_selection_requests)
Kim F. Storm <storm@cua.dk>
parents:
57633
diff
changeset
|
1031 extern void x_handle_selection_event P_ ((struct input_event *)); |
21515 | 1032 extern void x_clear_frame_selections P_ ((struct frame *)); |
1033 | |
53784
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1034 extern int x_handle_dnd_message P_ ((struct frame *, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1035 XClientMessageEvent *, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1036 struct x_display_info *, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1037 struct input_event *bufp)); |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1038 extern int x_check_property_data P_ ((Lisp_Object)); |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1039 extern void x_fill_property_data P_ ((Display *, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1040 Lisp_Object, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1041 void *, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1042 int)); |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1043 extern Lisp_Object x_property_data_to_lisp P_ ((struct frame *, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1044 unsigned char *, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1045 Atom, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1046 int, |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1047 unsigned long)); |
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1048 |
21515 | 1049 /* Defined in xfns.c */ |
1050 | |
53784
1f46ef2766f4
* xterm.h: Add x_handle_dnd_message, x_check_property_data,
Jan Djärv <jan.h.d@swipnet.se>
parents:
53069
diff
changeset
|
1051 extern struct x_display_info * check_x_display_info P_ ((Lisp_Object frame)); |
21515 | 1052 extern int have_menus_p P_ ((void)); |
51899
5c89c59e087d
(xg_set_icon): New function.
Juanma Barranquero <lekktu@gmail.com>
parents:
51214
diff
changeset
|
1053 |
5c89c59e087d
(xg_set_icon): New function.
Juanma Barranquero <lekktu@gmail.com>
parents:
51214
diff
changeset
|
1054 #ifdef USE_GTK |
5c89c59e087d
(xg_set_icon): New function.
Juanma Barranquero <lekktu@gmail.com>
parents:
51214
diff
changeset
|
1055 extern int xg_set_icon P_ ((struct frame *, Lisp_Object)); |
67265
8c33a73a9eb2
Add prototype for xg_set_icon_from_xpm_data.
Jan Djärv <jan.h.d@swipnet.se>
parents:
65713
diff
changeset
|
1056 extern int xg_set_icon_from_xpm_data P_ ((struct frame *, char**)); |
51899
5c89c59e087d
(xg_set_icon): New function.
Juanma Barranquero <lekktu@gmail.com>
parents:
51214
diff
changeset
|
1057 #endif /* USE_GTK */ |
5c89c59e087d
(xg_set_icon): New function.
Juanma Barranquero <lekktu@gmail.com>
parents:
51214
diff
changeset
|
1058 |
21515 | 1059 extern void x_real_positions P_ ((struct frame *, int *, int *)); |
1060 extern int defined_color P_ ((struct frame *, char *, XColor *, int)); | |
1061 extern void x_set_border_pixel P_ ((struct frame *, int)); | |
1062 extern void x_set_menu_bar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object)); | |
1063 extern void x_implicitly_set_name P_ ((struct frame *, Lisp_Object, Lisp_Object)); | |
57633
ead4249849ac
* xterm.h (x_output): New member `xic_base_fontname'.
Jan Djärv <jan.h.d@swipnet.se>
parents:
57624
diff
changeset
|
1064 extern void xic_free_xfontset P_ ((struct frame *)); |
27501
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
1065 extern void create_frame_xic P_ ((struct frame *)); |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
1066 extern void destroy_frame_xic P_ ((struct frame *)); |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
1067 extern void xic_set_preeditarea P_ ((struct window *, int, int)); |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
1068 extern void xic_set_statusarea P_ ((struct frame *)); |
ea054e85f0e2
(struct x_display_info) [HAVE_X_I18N]: Add members `xim'
Gerd Moellmann <gerd@gnu.org>
parents:
26878
diff
changeset
|
1069 extern void xic_set_xfontset P_ ((struct frame *, char *)); |
21515 | 1070 extern int x_pixel_width P_ ((struct frame *)); |
1071 extern int x_pixel_height P_ ((struct frame *)); | |
1072 extern int x_char_width P_ ((struct frame *)); | |
1073 extern int x_char_height P_ ((struct frame *)); | |
1074 extern int x_screen_planes P_ ((struct frame *)); | |
1075 extern void x_sync P_ ((struct frame *)); | |
29780
520e4132439f
Remove duplicate prototypes. Declare free_frame_xic,
Dave Love <fx@gnu.org>
parents:
28784
diff
changeset
|
1076 extern int x_defined_color P_ ((struct frame *, char *, XColor *, int)); |
520e4132439f
Remove duplicate prototypes. Declare free_frame_xic,
Dave Love <fx@gnu.org>
parents:
28784
diff
changeset
|
1077 #ifdef HAVE_X_I18N |
520e4132439f
Remove duplicate prototypes. Declare free_frame_xic,
Dave Love <fx@gnu.org>
parents:
28784
diff
changeset
|
1078 extern void free_frame_xic P_ ((struct frame *)); |
520e4132439f
Remove duplicate prototypes. Declare free_frame_xic,
Dave Love <fx@gnu.org>
parents:
28784
diff
changeset
|
1079 #endif |
520e4132439f
Remove duplicate prototypes. Declare free_frame_xic,
Dave Love <fx@gnu.org>
parents:
28784
diff
changeset
|
1080 extern void x_set_tool_bar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object)); |
21515 | 1081 |
1082 /* Defined in xfaces.c */ | |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
1083 |
21515 | 1084 extern int compute_glyph_face P_ ((struct frame *, int, int)); |
1085 extern int compute_glyph_face_1 P_ ((struct frame *, Lisp_Object, int)); | |
38256
22c9c2b59427
(x_free_dpy_colors): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
38184
diff
changeset
|
1086 extern void x_free_dpy_colors P_ ((Display *, Screen *, Colormap, |
22c9c2b59427
(x_free_dpy_colors): Add prototype.
Gerd Moellmann <gerd@gnu.org>
parents:
38184
diff
changeset
|
1087 unsigned long *, int)); |
21515 | 1088 |
1089 /* Defined in xmenu.c */ | |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
1090 |
58202
54c649507b74
* xfns.c (Fx_file_dialog): Call x_menu_in_use and x_menu_set_in_use.
Jan Djärv <jan.h.d@swipnet.se>
parents:
57954
diff
changeset
|
1091 extern void x_menu_set_in_use P_ ((int)); |
54c649507b74
* xfns.c (Fx_file_dialog): Call x_menu_in_use and x_menu_set_in_use.
Jan Djärv <jan.h.d@swipnet.se>
parents:
57954
diff
changeset
|
1092 extern void x_menu_wait_for_event P_ ((void *data)); |
21515 | 1093 extern void x_activate_menubar P_ ((struct frame *)); |
1094 extern int popup_activated P_ ((void)); | |
1095 extern void initialize_frame_menubar P_ ((struct frame *)); | |
53824
744aeda2efac
Add declaration of free_frame_menubar.
Jan Djärv <jan.h.d@swipnet.se>
parents:
53784
diff
changeset
|
1096 extern void free_frame_menubar P_ ((struct frame *)); |
21515 | 1097 |
1098 /* Defined in widget.c */ | |
24990
7505930b5456
(struct x_output): Add scroll bar pixel colors, busy_cursor,
Gerd Moellmann <gerd@gnu.org>
parents:
23037
diff
changeset
|
1099 |
23034
c458948948a9
(widget_store_internal_border): Conditionalize declaration.
Richard M. Stallman <rms@gnu.org>
parents:
23022
diff
changeset
|
1100 #ifdef USE_X_TOOLKIT |
21515 | 1101 extern void widget_store_internal_border P_ ((Widget)); |
23034
c458948948a9
(widget_store_internal_border): Conditionalize declaration.
Richard M. Stallman <rms@gnu.org>
parents:
23022
diff
changeset
|
1102 #endif |
43811
02c8b8c0f570
Extern declare x_session_check_input () and x_session_initialize ().
Jan Djärv <jan.h.d@swipnet.se>
parents:
43453
diff
changeset
|
1103 |
02c8b8c0f570
Extern declare x_session_check_input () and x_session_initialize ().
Jan Djärv <jan.h.d@swipnet.se>
parents:
43453
diff
changeset
|
1104 /* Defined in xsmfns.c */ |
02c8b8c0f570
Extern declare x_session_check_input () and x_session_initialize ().
Jan Djärv <jan.h.d@swipnet.se>
parents:
43453
diff
changeset
|
1105 #ifdef HAVE_X_SM |
52298
1a4bd2bec861
Create and initialize a client leader window so session management
Jan Djärv <jan.h.d@swipnet.se>
parents:
52090
diff
changeset
|
1106 extern void x_session_initialize P_ ((struct x_display_info *dpyinfo)); |
54174
129757bd14b1
(x_session_check_input): Fix prototype.
Kim F. Storm <storm@cua.dk>
parents:
53824
diff
changeset
|
1107 extern int x_session_check_input P_ ((struct input_event *bufp)); |
43811
02c8b8c0f570
Extern declare x_session_check_input () and x_session_initialize ().
Jan Djärv <jan.h.d@swipnet.se>
parents:
43453
diff
changeset
|
1108 extern int x_session_have_connection P_ ((void)); |
02c8b8c0f570
Extern declare x_session_check_input () and x_session_initialize ().
Jan Djärv <jan.h.d@swipnet.se>
parents:
43453
diff
changeset
|
1109 #endif |
50152
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1110 |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1111 #define FONT_TYPE_FOR_UNIBYTE(font, ch) 0 |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1112 #define FONT_TYPE_FOR_MULTIBYTE(font, ch) 0 |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1113 |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1114 #define STORE_XCHAR2B(chp, b1, b2) \ |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1115 ((chp)->byte1 = (b1), (chp)->byte2 = (b2)) |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1116 |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1117 #define XCHAR2B_BYTE1(chp) \ |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1118 ((chp)->byte1) |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1119 |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1120 #define XCHAR2B_BYTE2(chp) \ |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1121 ((chp)->byte2) |
a3befb42ffd3
(FONT_DESCENT, FRAME_X_OUTPUT, FRAME_BASELINE_OFFSET)
Kim F. Storm <storm@cua.dk>
parents:
50099
diff
changeset
|
1122 |
50248
04d8f8a13cf8
(STORE_NATIVE_RECT): New macro.
Kim F. Storm <storm@cua.dk>
parents:
50238
diff
changeset
|
1123 |
04d8f8a13cf8
(STORE_NATIVE_RECT): New macro.
Kim F. Storm <storm@cua.dk>
parents:
50238
diff
changeset
|
1124 #define STORE_NATIVE_RECT(nr,rx,ry,rwidth,rheight) \ |
04d8f8a13cf8
(STORE_NATIVE_RECT): New macro.
Kim F. Storm <storm@cua.dk>
parents:
50238
diff
changeset
|
1125 ((nr).x = (rx), \ |
04d8f8a13cf8
(STORE_NATIVE_RECT): New macro.
Kim F. Storm <storm@cua.dk>
parents:
50238
diff
changeset
|
1126 (nr).y = (ry), \ |
04d8f8a13cf8
(STORE_NATIVE_RECT): New macro.
Kim F. Storm <storm@cua.dk>
parents:
50238
diff
changeset
|
1127 (nr).width = (rwidth), \ |
04d8f8a13cf8
(STORE_NATIVE_RECT): New macro.
Kim F. Storm <storm@cua.dk>
parents:
50238
diff
changeset
|
1128 (nr).height = (rheight)) |
52401 | 1129 |
1130 /* arch-tag: 78a7972a-b18f-4694-861a-0780c4b3090e | |
1131 (do not change this comment) */ |