annotate oldXMenu/XMenuInt.h @ 57191:bd5d1158ebcf

(ido-choice-list): New dynamic var for `list' context. (ido-context-switch-command): New dynamic var. (ido-define-mode-map): Generalize switch between file/buffer contexts. (ido-read-internal): Handle new `list' context. Handle insert-buffer and insert-file ido-exit values. (ido-buffer-internal): New arg switch-cmd. Use it to setup ido-context-switch-command. Handle insert-file ido-exit value. (ido-read-buffer): Set ido-context-switch-command to 'ignore unless it is already bound by caller. (ido-file-internal): New arg switch-cmd. Use it to setup ido-context-switch-command. Handle insert-buffer ido-exit value. (ido-enter-insert-buffer, ido-enter-insert-file): New commands used for context switching. (ido-all-completions): Handle new `list' context. (ido-make-choice-list): Return choices for `list' context. (ido-find-file-in-dir, ido-display-file, ido-write-file) (ido-display-buffer, ido-kill-buffer): Disable context switching. (ido-insert-buffer, ido-insert-file): Setup context switching. (ido-exhibit): Handle `list' context. (ido-read-file-name): Disable context switching. Handle fallback. (ido-read-directory-name): Disable context switching. (ido-completing-read): New defun like completing-read. Setup and use new `list' context.
author Kim F. Storm <storm@cua.dk>
date Wed, 22 Sep 2004 22:49:07 +0000
parents e8824c4f5f7e
children 3861ff8f4bf1 8e5779acd195
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
1
Dave Love <fx@gnu.org>
parents:
diff changeset
2 /* Copyright Massachusetts Institute of Technology 1985 */
Dave Love <fx@gnu.org>
parents:
diff changeset
3
Dave Love <fx@gnu.org>
parents:
diff changeset
4 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
5 * XMenu: MIT Project Athena, X Window system menu package
Dave Love <fx@gnu.org>
parents:
diff changeset
6 *
Dave Love <fx@gnu.org>
parents:
diff changeset
7 * XMenuInternal.h - Internal menu system include file for the
Dave Love <fx@gnu.org>
parents:
diff changeset
8 * MIT Project Athena XMenu X window system
Dave Love <fx@gnu.org>
parents:
diff changeset
9 * menu package.
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 25858
diff changeset
10 *
25858
Dave Love <fx@gnu.org>
parents:
diff changeset
11 * Author: Tony Della Fera, DEC
Dave Love <fx@gnu.org>
parents:
diff changeset
12 * October, 1985
Dave Love <fx@gnu.org>
parents:
diff changeset
13 */
Dave Love <fx@gnu.org>
parents:
diff changeset
14
Dave Love <fx@gnu.org>
parents:
diff changeset
15 #ifndef _XMenuInternal_h_
Dave Love <fx@gnu.org>
parents:
diff changeset
16 #define _XMenuInternal_h_
Dave Love <fx@gnu.org>
parents:
diff changeset
17
Dave Love <fx@gnu.org>
parents:
diff changeset
18 /* Avoid warnings about redefining NULL by including <stdio.h> first;
Dave Love <fx@gnu.org>
parents:
diff changeset
19 the other file which wants to define it (<stddef.h> on Ultrix
Dave Love <fx@gnu.org>
parents:
diff changeset
20 systems) can deal if NULL is already defined, but <stdio.h> can't. */
Dave Love <fx@gnu.org>
parents:
diff changeset
21 #include <stdio.h>
Dave Love <fx@gnu.org>
parents:
diff changeset
22 #include <X11/Xlib.h>
Dave Love <fx@gnu.org>
parents:
diff changeset
23 #include "X10.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
24 #include "XMenu.h"
Dave Love <fx@gnu.org>
parents:
diff changeset
25
Dave Love <fx@gnu.org>
parents:
diff changeset
26 #define min(x, y) ((x) <= (y) ? (x) : (y))
Dave Love <fx@gnu.org>
parents:
diff changeset
27 #define max(x, y) ((x) >= (y) ? (x) : (y))
Dave Love <fx@gnu.org>
parents:
diff changeset
28 #define abs(a) ((a) < 0 ? -(a) : (a))
Dave Love <fx@gnu.org>
parents:
diff changeset
29
Dave Love <fx@gnu.org>
parents:
diff changeset
30 #define _X_FAILURE -1
Dave Love <fx@gnu.org>
parents:
diff changeset
31
Dave Love <fx@gnu.org>
parents:
diff changeset
32 #define _SUCCESS 1
Dave Love <fx@gnu.org>
parents:
diff changeset
33 #define _FAILURE -1
Dave Love <fx@gnu.org>
parents:
diff changeset
34
Dave Love <fx@gnu.org>
parents:
diff changeset
35 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
36 * XMenu internal event handler variable.
Dave Love <fx@gnu.org>
parents:
diff changeset
37 */
Dave Love <fx@gnu.org>
parents:
diff changeset
38 extern int (*_XMEventHandler)();
Dave Love <fx@gnu.org>
parents:
diff changeset
39
Dave Love <fx@gnu.org>
parents:
diff changeset
40 #ifndef Pixel
Dave Love <fx@gnu.org>
parents:
diff changeset
41 #define Pixel unsigned long
Dave Love <fx@gnu.org>
parents:
diff changeset
42 #endif
Dave Love <fx@gnu.org>
parents:
diff changeset
43
Dave Love <fx@gnu.org>
parents:
diff changeset
44 /*
Dave Love <fx@gnu.org>
parents:
diff changeset
45 * Internal routine declarations.
Dave Love <fx@gnu.org>
parents:
diff changeset
46 */
Dave Love <fx@gnu.org>
parents:
diff changeset
47 int _XMWinQueInit(); /* No value actually returned. */
Dave Love <fx@gnu.org>
parents:
diff changeset
48 int _XMWinQueAddPane();
Dave Love <fx@gnu.org>
parents:
diff changeset
49 int _XMWinQueAddSelection();
Dave Love <fx@gnu.org>
parents:
diff changeset
50 int _XMWinQueFlush();
Dave Love <fx@gnu.org>
parents:
diff changeset
51 XMPane *_XMGetPanePtr();
Dave Love <fx@gnu.org>
parents:
diff changeset
52 XMSelect *_XMGetSelectionPtr();
Dave Love <fx@gnu.org>
parents:
diff changeset
53 int _XMRecomputeGlobals(); /* No value actually returned. */
Dave Love <fx@gnu.org>
parents:
diff changeset
54 int _XMRecomputePane();
Dave Love <fx@gnu.org>
parents:
diff changeset
55 int _XMRecomputeSelection();
Dave Love <fx@gnu.org>
parents:
diff changeset
56 int _XMTransToOrigin(); /* No value actually returned. */
Dave Love <fx@gnu.org>
parents:
diff changeset
57 int _XMRefreshPane(); /* No value actually returned. */
Dave Love <fx@gnu.org>
parents:
diff changeset
58 int _XMRefreshSelections(); /* No value actually returned. */
Dave Love <fx@gnu.org>
parents:
diff changeset
59 int _XMHighlightSelection(); /* No value actually returned. */
Dave Love <fx@gnu.org>
parents:
diff changeset
60
Dave Love <fx@gnu.org>
parents:
diff changeset
61 #endif
Dave Love <fx@gnu.org>
parents:
diff changeset
62 /* Don't add stuff after this #endif */
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
63
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
64 /* arch-tag: 00640af1-9386-48b5-a4be-35620b8cd3aa
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
65 (do not change this comment) */