Mercurial > emacs
annotate src/msdos.h @ 112387:ac3e3168aca2
allout.el: Summary - migrate to defining allout mode using
define-minor-mode instead of defun. Significantly clean-up internal keymap
provisions, refactoring a bit and removing a lot of accumulated cruft.
allout-mode-map is now a keymap by virtue of being an defalias to
allout-mode-map-value, which contains the actual keymap structure.
(allout-mode): Use define-minor-mode rather than defun. Remove
now-unnecessary minor-mode setup activities from the body. Specify :keymap
as allout-mode-map so the minor-mode-map-alist entry will be
'(allout-mode . allout-mode-map) - see allout-mode-map-value, below.
Adjust docstring to track changes.
(allout-minor-mode): Remove this defalias, now that we're using
define-minor-mode.
(allout-mode-map): Set value to be 'allout-mode-map. The actual keymap
is allout-mode-map-value, via defalias.
(allout-mode-map-value): The variable holding the actual mode keymap
structure, by virtue of defalias from allout-mode-map.
(allout-compose-and-institute-keymap): Renamed from allout-bind-keys, and
including the binding-composition functionality of the former
produce-allout-mode-map and allout-setup-mode-map.
(allout-institute-keymap): Take over the "setup" part of the former
allout-setup-mode-map. Reassign allout-mode-map-value value and update the
defalias.
(allout-command-prefix) (allout-prefixed-keybindings)
(allout-unprefixed-keybindings): Use allout-compose-and-institute-keymap to
process the bindings.
(allout-unprefixed-keybindings): Remove extraneous '?' question marks.
(allout-prefixed-keybindings): Elide binding to (prefixed) \C-h - user can
customize if they want to use that binding. Bind allout-copy-topic-as-kill
to (prefixed) \M-k. Bind allout-up-current-level to (prefixed) \C-u. (I
think i mistakenly elided that, previously, instead of the one for \C-h.)
(allout-hotspot-key-handler): Remove attempt to resolve the key through the
literal key-string lookup on allout-keybindings-list. That probably hasn't
worked for a Long Time, and removal of allout-keybindings-list further
simplifies the keybindings situation.
(allout-pre-command-business): Use allout-mode-map-value instead of
allout-mode-map.
(allout-preempt-trailing-ctrl-h): Remove. The user can customize the
bindings if they want to use a keybinding having a trailing \C-h. No
deprecation needed since this feature was never in a release.
(allout-keybindings-list): Remove. It's not been useful for a while. (See
allout-hotspot-key-handler changes, above.)
(produce-allout-mode-map): Remove. Consolidate into
allout-compose-and-institute-keymap.
(allout-mode-map-adjustments): Remove. No longer necessary with removal of
allout-preempt-trailing-ctrl-h.
(allout-setup-mode-map): Remove. Consolidate into
allout-compose-and-institute-keymap and allout-institute-keymap.
author | Ken Manheimer <ken.manheimer@gmail.com> |
---|---|
date | Thu, 20 Jan 2011 13:13:30 -0500 |
parents | ef719132ddfa |
children |
rev | line source |
---|---|
5503 | 1 /* MS-DOS specific C utilities, interface. |
64770
a0d1312ede66
Update years in copyright notice; nfc.
Thien-Thi Nguyen <ttn@gnuvola.org>
parents:
64084
diff
changeset
|
2 Copyright (C) 1993, 2001, 2002, 2003, 2004, |
112218
376148b31b5e
Add 2011 to FSF/AIST copyright years.
Glenn Morris <rgm@gnu.org>
parents:
106815
diff
changeset
|
3 2005, 2006, 2007, 2008, 2009, 2010, 2011 Free Software Foundation, Inc. |
5503 | 4 |
5 This file is part of GNU Emacs. | |
6 | |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
87649
diff
changeset
|
7 GNU Emacs is free software: you can redistribute it and/or modify |
5503 | 8 it under the terms of the GNU General Public License as published by |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
87649
diff
changeset
|
9 the Free Software Foundation, either version 3 of the License, or |
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
87649
diff
changeset
|
10 (at your option) any later version. |
5503 | 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 | |
94994
29adfc9354e7
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
87649
diff
changeset
|
18 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ |
5503 | 19 |
29611
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
20 #ifndef EMACS_MSDOS_H |
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
21 #define EMACS_MSDOS_H |
9572 | 22 |
5503 | 23 #include <dpmi.h> |
24 | |
97661
e4a283c4bc1c
Remove definition of struct x_display_info and struct x_output.
Eli Zaretskii <eliz@gnu.org>
parents:
94994
diff
changeset
|
25 int dos_ttraw (struct tty_display_info *); |
109162
8efd6d04c47a
Convert function definitions in MS-DOS sources to ANSI C.
Eli Zaretskii <eliz@gnu.org>
parents:
109104
diff
changeset
|
26 int dos_ttcooked (void); |
13178 | 27 int dos_get_saved_screen (char **, int *, int *); |
28 int dos_set_keyboard (int, int); | |
14285
6081221167de
(dos_set_window_size): Prototype for a new function.
Karl Heuer <kwzh@gnu.org>
parents:
14186
diff
changeset
|
29 void dos_set_window_size (int *, int *); |
13178 | 30 |
5503 | 31 int getdefdir (int, char*); |
32 void unixtodos_filename (char *); | |
33 void dostounix_filename (char *); | |
7822
17b96e349369
Add template for rootrelativepath.
Richard M. Stallman <rms@gnu.org>
parents:
7604
diff
changeset
|
34 char *rootrelativepath (char *); |
109162
8efd6d04c47a
Convert function definitions in MS-DOS sources to ANSI C.
Eli Zaretskii <eliz@gnu.org>
parents:
109104
diff
changeset
|
35 void init_environment (int, char **, int); |
8efd6d04c47a
Convert function definitions in MS-DOS sources to ANSI C.
Eli Zaretskii <eliz@gnu.org>
parents:
109104
diff
changeset
|
36 void internal_terminal_init (void); |
111345
8ed4db9b46e6
Fix mouse redesigned mouse highlight on MSDOS.
Eli Zaretskii <eliz@gnu.org>
parents:
111344
diff
changeset
|
37 void initialize_msdos_display (struct terminal *); |
5503 | 38 |
39 extern int have_mouse; | |
109162
8efd6d04c47a
Convert function definitions in MS-DOS sources to ANSI C.
Eli Zaretskii <eliz@gnu.org>
parents:
109104
diff
changeset
|
40 void mouse_init (void); |
8efd6d04c47a
Convert function definitions in MS-DOS sources to ANSI C.
Eli Zaretskii <eliz@gnu.org>
parents:
109104
diff
changeset
|
41 void mouse_on (void); |
8efd6d04c47a
Convert function definitions in MS-DOS sources to ANSI C.
Eli Zaretskii <eliz@gnu.org>
parents:
109104
diff
changeset
|
42 void mouse_off (void); |
5503 | 43 void mouse_moveto (int, int); |
9572 | 44 |
45 #ifndef HAVE_X_WINDOWS | |
46 /* Dummy types. */ | |
47 typedef int XFontStruct; | |
48 typedef int GC; | |
49 typedef int Pixmap; | |
50 typedef int Display; | |
51 typedef int Window; | |
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
52 typedef int XRectangle; |
74497
07c34c917584
(PIX_TYPE): Redefine as `unsigned long'.
Eli Zaretskii <eliz@gnu.org>
parents:
68651
diff
changeset
|
53 #define PIX_TYPE unsigned long |
9572 | 54 #define XDISPLAY |
55 | |
97661
e4a283c4bc1c
Remove definition of struct x_display_info and struct x_output.
Eli Zaretskii <eliz@gnu.org>
parents:
94994
diff
changeset
|
56 typedef struct tty_display_info Display_Info; |
27018 | 57 |
97661
e4a283c4bc1c
Remove definition of struct x_display_info and struct x_output.
Eli Zaretskii <eliz@gnu.org>
parents:
94994
diff
changeset
|
58 extern struct tty_display_info the_only_display_info; |
9572 | 59 |
60 #define FRAME_X_DISPLAY(f) ((Display *) 0) | |
97661
e4a283c4bc1c
Remove definition of struct x_display_info and struct x_output.
Eli Zaretskii <eliz@gnu.org>
parents:
94994
diff
changeset
|
61 #define FRAME_FONT(f) ((f)->output_data.tty->font) |
e4a283c4bc1c
Remove definition of struct x_display_info and struct x_output.
Eli Zaretskii <eliz@gnu.org>
parents:
94994
diff
changeset
|
62 #define FRAME_X_DISPLAY_INFO(f) (&the_only_display_info) |
27957
5210a97b3ac7
(FRAME_INTERNAL_BORDER_WIDTH): Define to zero.
Eli Zaretskii <eliz@gnu.org>
parents:
27463
diff
changeset
|
63 |
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
64 /* Prototypes. */ |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
65 |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
66 /* Forward declarations for prototypes. */ |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
67 struct frame; |
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
68 struct window; |
25111
36169f5d88da
Remove redundant declarations (most of them are now in
Eli Zaretskii <eliz@gnu.org>
parents:
21784
diff
changeset
|
69 |
36169f5d88da
Remove redundant declarations (most of them are now in
Eli Zaretskii <eliz@gnu.org>
parents:
21784
diff
changeset
|
70 /* Defined in xfns.c; emulated on msdos.c */ |
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
71 |
109099 | 72 extern void x_set_menu_bar_lines (struct frame *, Lisp_Object, Lisp_Object); |
73 extern int x_pixel_width (struct frame *); | |
74 extern int x_pixel_height (struct frame *); | |
21784
8de4e2a8cc62
[!HAVE_X_WINDOWS]: Add a dummy typedef for XRectangle
Eli Zaretskii <eliz@gnu.org>
parents:
15386
diff
changeset
|
75 |
9572 | 76 #define XFreeGC (void) |
77 #define x_destroy_bitmap(p1,p2) | |
78 #define XGetGeometry(p1,p2,p3,p4,p5,p6,p7,p8,p9) | |
51202
62a7506ec831
(struct x_output): Remove members left_pos, top_pos,
Kim F. Storm <storm@cua.dk>
parents:
50247
diff
changeset
|
79 #define DisplayWidth(p1,p2) (SELECTED_FRAME()->text_cols) |
62a7506ec831
(struct x_output): Remove members left_pos, top_pos,
Kim F. Storm <storm@cua.dk>
parents:
50247
diff
changeset
|
80 #define DisplayHeight(p1,p2) (SELECTED_FRAME()->text_lines) |
9572 | 81 #define XMenuSetAEQ (void) |
82 #define XMenuSetFreeze (void) | |
83 #define XMenuRecompute (void) | |
84 #define FONT_WIDTH(foo) 1 | |
85 #define XM_FAILURE -1 | |
86 #define XM_SUCCESS 1 | |
87 #define XM_NO_SELECT 2 | |
88 #define XM_IA_SELECT 3 | |
89 #define ButtonReleaseMask 0 | |
90 | |
91 typedef struct x_menu_struct | |
92 { | |
93 int count; | |
94 char **text; | |
95 struct x_menu_struct **submenu; | |
96 int *panenumber; /* Also used as enable. */ | |
97 int allocated; | |
98 int panecount; | |
99 int width; | |
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
100 char **help_text; |
9572 | 101 } XMenu; |
102 | |
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
103 XMenu *XMenuCreate (Display *, Window, char *); |
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
104 int XMenuAddPane (Display *, XMenu *, char *, int); |
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
105 int XMenuAddSelection (Display *, XMenu *, int, int, char *, int, char *); |
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
106 void XMenuLocate (Display *, XMenu *, int, int, int, int, |
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
107 int *, int *, int *, int *); |
27463
6e3d60350319
Change prototypes of XMenuAddSelection and XMenuActivate.
Eli Zaretskii <eliz@gnu.org>
parents:
27018
diff
changeset
|
108 int XMenuActivate (Display *, XMenu *, int *, int *, int, int, unsigned, |
30340
be29e15ece0e
(XMenuActivate): Update prototype.
Eli Zaretskii <eliz@gnu.org>
parents:
29611
diff
changeset
|
109 char **, void (*callback)(char *, int, int)); |
10503
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
110 void XMenuDestroy (Display *, XMenu *); |
4d94f31dc555
(x_mouse_leave): Add neutralizing define.
Richard M. Stallman <rms@gnu.org>
parents:
9572
diff
changeset
|
111 |
9572 | 112 #endif /* not HAVE_X_WINDOWS */ |
113 | |
29611
f39e60352427
(EMACS_MSDOS_H): Renamed from MSDOS_H_.
Eli Zaretskii <eliz@gnu.org>
parents:
29557
diff
changeset
|
114 #endif /* not EMACS_MSDOS_H */ |
52401 | 115 |