annotate man/lispref/minibuf.texi @ 123:c77884c6318d

Added tag r20-1b14 for changeset d2f30a177268
author cvs
date Mon, 13 Aug 2007 09:26:04 +0200
parents 131b0175ea99
children 6075d714658b
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1 @c -*-texinfo-*-
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
2 @c This is part of the XEmacs Lisp Reference Manual.
70
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents: 54
diff changeset
3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
4 @c See the file lispref.texi for copying conditions.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
5 @setfilename ../../info/minibuf.info
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
6 @node Minibuffers, Command Loop, Read and Print, Top
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
7 @chapter Minibuffers
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
8 @cindex arguments, reading
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
9 @cindex complex arguments
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
10 @cindex minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
11
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
12 A @dfn{minibuffer} is a special buffer that XEmacs commands use to read
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
13 arguments more complicated than the single numeric prefix argument.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
14 These arguments include file names, buffer names, and command names (as
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
15 in @kbd{M-x}). The minibuffer is displayed on the bottom line of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
16 frame, in the same place as the echo area, but only while it is in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
17 use for reading an argument.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
18
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
19 @menu
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
20 * Intro to Minibuffers:: Basic information about minibuffers.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
21 * Text from Minibuffer:: How to read a straight text string.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
22 * Object from Minibuffer:: How to read a Lisp object or expression.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
23 * Minibuffer History:: Recording previous minibuffer inputs
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
24 so the user can reuse them.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
25 * Completion:: How to invoke and customize completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
26 * Yes-or-No Queries:: Asking a question with a simple answer.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
27 * Multiple Queries:: Asking a series of similar questions.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
28 * Minibuffer Misc:: Various customization hooks and variables.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
29 @end menu
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
30
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
31 @node Intro to Minibuffers
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
32 @section Introduction to Minibuffers
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
33
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
34 In most ways, a minibuffer is a normal XEmacs buffer. Most operations
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
35 @emph{within} a buffer, such as editing commands, work normally in a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
36 minibuffer. However, many operations for managing buffers do not apply
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
37 to minibuffers. The name of a minibuffer always has the form @w{@samp{
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
38 *Minibuf-@var{number}}}, and it cannot be changed. Minibuffers are
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
39 displayed only in special windows used only for minibuffers; these
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
40 windows always appear at the bottom of a frame. (Sometime frames have
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
41 no minibuffer window, and sometimes a special kind of frame contains
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
42 nothing but a minibuffer window; see @ref{Minibuffers and Frames}.)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
43
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
44 The minibuffer's window is normally a single line. You can resize it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
45 temporarily with the window sizing commands; it reverts to its normal
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
46 size when the minibuffer is exited. You can resize it permanently by
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
47 using the window sizing commands in the frame's other window, when the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
48 minibuffer is not active. If the frame contains just a minibuffer, you
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
49 can change the minibuffer's size by changing the frame's size.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
50
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
51 If a command uses a minibuffer while there is an active minibuffer,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
52 this is called a @dfn{recursive minibuffer}. The first minibuffer is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
53 named @w{@samp{ *Minibuf-0*}}. Recursive minibuffers are named by
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
54 incrementing the number at the end of the name. (The names begin with a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
55 space so that they won't show up in normal buffer lists.) Of several
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
56 recursive minibuffers, the innermost (or most recently entered) is the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
57 active minibuffer. We usually call this ``the'' minibuffer. You can
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
58 permit or forbid recursive minibuffers by setting the variable
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
59 @code{enable-recursive-minibuffers}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
60
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
61 Like other buffers, a minibuffer may use any of several local keymaps
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
62 (@pxref{Keymaps}); these contain various exit commands and in some cases
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
63 completion commands (@pxref{Completion}).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
64
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
65 @itemize @bullet
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
66 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
67 @code{minibuffer-local-map} is for ordinary input (no completion).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
68
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
69 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
70 @code{minibuffer-local-ns-map} is similar, except that @key{SPC} exits
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
71 just like @key{RET}. This is used mainly for Mocklisp compatibility.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
72
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
73 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
74 @code{minibuffer-local-completion-map} is for permissive completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
75
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
76 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
77 @code{minibuffer-local-must-match-map} is for strict completion and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
78 for cautious completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
79 @end itemize
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
80
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
81 @node Text from Minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
82 @section Reading Text Strings with the Minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
83
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
84 Most often, the minibuffer is used to read text as a string. It can
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
85 also be used to read a Lisp object in textual form. The most basic
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
86 primitive for minibuffer input is @code{read-from-minibuffer}; it can do
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
87 either one.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
88
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
89 In most cases, you should not call minibuffer input functions in the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
90 middle of a Lisp function. Instead, do all minibuffer input as part of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
91 reading the arguments for a command, in the @code{interactive} spec.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
92 @xref{Defining Commands}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
93
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
94 @defun read-from-minibuffer prompt-string &optional initial-contents keymap read hist
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
95 This function is the most general way to get input through the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
96 minibuffer. By default, it accepts arbitrary text and returns it as a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
97 string; however, if @var{read} is non-@code{nil}, then it uses
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
98 @code{read} to convert the text into a Lisp object (@pxref{Input
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
99 Functions}).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
100
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
101 The first thing this function does is to activate a minibuffer and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
102 display it with @var{prompt-string} as the prompt. This value must be a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
103 string.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
104
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
105 Then, if @var{initial-contents} is a string, @code{read-from-minibuffer}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
106 inserts it into the minibuffer, leaving point at the end. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
107 minibuffer appears with this text as its contents.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
108
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
109 @c Emacs 19 feature
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
110 The value of @var{initial-contents} may also be a cons cell of the form
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
111 @code{(@var{string} . @var{position})}. This means to insert
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
112 @var{string} in the minibuffer but put point @var{position} characters
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
113 from the beginning, rather than at the end.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
114
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
115 If @var{keymap} is non-@code{nil}, that keymap is the local keymap to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
116 use in the minibuffer. If @var{keymap} is omitted or @code{nil}, the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
117 value of @code{minibuffer-local-map} is used as the keymap. Specifying
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
118 a keymap is the most important way to customize the minibuffer for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
119 various applications such as completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
120
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
121 The argument @var{hist} specifies which history list variable to use
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
122 for saving the input and for history commands used in the minibuffer.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
123 It defaults to @code{minibuffer-history}. @xref{Minibuffer History}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
124
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
125 When the user types a command to exit the minibuffer,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
126 @code{read-from-minibuffer} uses the text in the minibuffer to produce
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
127 its return value. Normally it simply makes a string containing that
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
128 text. However, if @var{read} is non-@code{nil},
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
129 @code{read-from-minibuffer} reads the text and returns the resulting
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
130 Lisp object, unevaluated. (@xref{Input Functions}, for information
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
131 about reading.)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
132 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
133
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
134 @defun read-string prompt &optional initial
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
135 This function reads a string from the minibuffer and returns it. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
136 arguments @var{prompt} and @var{initial} are used as in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
137 @code{read-from-minibuffer}. The keymap used is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
138 @code{minibuffer-local-map}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
139
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
140 This is a simplified interface to the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
141 @code{read-from-minibuffer} function:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
142
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
143 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
144 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
145 (read-string @var{prompt} @var{initial})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
146 @equiv{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
147 (read-from-minibuffer @var{prompt} @var{initial} nil nil nil)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
148 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
149 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
150 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
151
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
152 @defvar minibuffer-local-map
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
153 This is the default local keymap for reading from the minibuffer. By
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
154 default, it makes the following bindings:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
155
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
156 @table @asis
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
157 @item @key{LFD}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
158 @code{exit-minibuffer}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
159
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
160 @item @key{RET}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
161 @code{exit-minibuffer}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
162
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
163 @item @kbd{C-g}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
164 @code{abort-recursive-edit}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
165
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
166 @item @kbd{M-n}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
167 @code{next-history-element}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
168
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
169 @item @kbd{M-p}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
170 @code{previous-history-element}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
171
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
172 @item @kbd{M-r}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
173 @code{next-matching-history-element}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
174
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
175 @item @kbd{M-s}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
176 @code{previous-matching-history-element}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
177 @end table
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
178 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
179
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
180 @c In version 18, initial is required
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
181 @c Emacs 19 feature
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
182 @defun read-no-blanks-input prompt &optional initial
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
183 This function reads a string from the minibuffer, but does not allow
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
184 whitespace characters as part of the input: instead, those characters
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
185 terminate the input. The arguments @var{prompt} and @var{initial} are
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
186 used as in @code{read-from-minibuffer}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
187
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
188 This is a simplified interface to the @code{read-from-minibuffer}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
189 function, and passes the value of the @code{minibuffer-local-ns-map}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
190 keymap as the @var{keymap} argument for that function. Since the keymap
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
191 @code{minibuffer-local-ns-map} does not rebind @kbd{C-q}, it @emph{is}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
192 possible to put a space into the string, by quoting it.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
193
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
194 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
195 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
196 (read-no-blanks-input @var{prompt} @var{initial})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
197 @equiv{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
198 (read-from-minibuffer @var{prompt} @var{initial} minibuffer-local-ns-map)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
199 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
200 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
201 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
202
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
203 @defvar minibuffer-local-ns-map
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
204 This built-in variable is the keymap used as the minibuffer local keymap
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
205 in the function @code{read-no-blanks-input}. By default, it makes the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
206 following bindings, in addition to those of @code{minibuffer-local-map}:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
207
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
208 @table @asis
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
209 @item @key{SPC}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
210 @cindex @key{SPC} in minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
211 @code{exit-minibuffer}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
212
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
213 @item @key{TAB}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
214 @cindex @key{TAB} in minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
215 @code{exit-minibuffer}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
216
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
217 @item @kbd{?}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
218 @cindex @kbd{?} in minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
219 @code{self-insert-and-exit}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
220 @end table
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
221 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
222
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
223 @node Object from Minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
224 @section Reading Lisp Objects with the Minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
225
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
226 This section describes functions for reading Lisp objects with the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
227 minibuffer.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
228
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
229 @defun read-minibuffer prompt &optional initial
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
230 This function reads a Lisp object in the minibuffer and returns it,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
231 without evaluating it. The arguments @var{prompt} and @var{initial} are
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
232 used as in @code{read-from-minibuffer}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
233
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
234 This is a simplified interface to the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
235 @code{read-from-minibuffer} function:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
236
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
237 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
238 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
239 (read-minibuffer @var{prompt} @var{initial})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
240 @equiv{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
241 (read-from-minibuffer @var{prompt} @var{initial} nil t)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
242 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
243 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
244
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
245 Here is an example in which we supply the string @code{"(testing)"} as
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
246 initial input:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
247
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
248 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
249 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
250 (read-minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
251 "Enter an expression: " (format "%s" '(testing)))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
252
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
253 ;; @r{Here is how the minibuffer is displayed:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
254 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
255
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
256 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
257 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
258 Enter an expression: (testing)@point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
259 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
260 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
261 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
262
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
263 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
264 The user can type @key{RET} immediately to use the initial input as a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
265 default, or can edit the input.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
266 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
267
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
268 @defun eval-minibuffer prompt &optional initial
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
269 This function reads a Lisp expression in the minibuffer, evaluates it,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
270 then returns the result. The arguments @var{prompt} and @var{initial}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
271 are used as in @code{read-from-minibuffer}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
272
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
273 This function simply evaluates the result of a call to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
274 @code{read-minibuffer}:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
275
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
276 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
277 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
278 (eval-minibuffer @var{prompt} @var{initial})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
279 @equiv{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
280 (eval (read-minibuffer @var{prompt} @var{initial}))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
281 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
282 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
283 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
284
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
285 @defun edit-and-eval-command prompt form
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
286 This function reads a Lisp expression in the minibuffer, and then
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
287 evaluates it. The difference between this command and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
288 @code{eval-minibuffer} is that here the initial @var{form} is not
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
289 optional and it is treated as a Lisp object to be converted to printed
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
290 representation rather than as a string of text. It is printed with
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
291 @code{prin1}, so if it is a string, double-quote characters (@samp{"})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
292 appear in the initial text. @xref{Output Functions}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
293
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
294 The first thing @code{edit-and-eval-command} does is to activate the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
295 minibuffer with @var{prompt} as the prompt. Then it inserts the printed
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
296 representation of @var{form} in the minibuffer, and lets the user edit.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
297 When the user exits the minibuffer, the edited text is read with
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
298 @code{read} and then evaluated. The resulting value becomes the value
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
299 of @code{edit-and-eval-command}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
300
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
301 In the following example, we offer the user an expression with initial
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
302 text which is a valid form already:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
303
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
304 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
305 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
306 (edit-and-eval-command "Please edit: " '(forward-word 1))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
307
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
308 ;; @r{After evaluation of the preceding expression,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
309 ;; @r{the following appears in the minibuffer:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
310 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
311
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
312 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
313 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
314 Please edit: (forward-word 1)@point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
315 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
316 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
317 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
318
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
319 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
320 Typing @key{RET} right away would exit the minibuffer and evaluate the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
321 expression, thus moving point forward one word.
70
131b0175ea99 Import from CVS: tag r20-0b30
cvs
parents: 54
diff changeset
322 @code{edit-and-eval-command} returns @code{nil} in this example.
0
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
323 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
324
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
325 @node Minibuffer History
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
326 @section Minibuffer History
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
327 @cindex minibuffer history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
328 @cindex history list
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
329
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
330 A @dfn{minibuffer history list} records previous minibuffer inputs so
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
331 the user can reuse them conveniently. A history list is actually a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
332 symbol, not a list; it is a variable whose value is a list of strings
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
333 (previous inputs), most recent first.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
334
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
335 There are many separate history lists, used for different kinds of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
336 inputs. It's the Lisp programmer's job to specify the right history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
337 list for each use of the minibuffer.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
338
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
339 The basic minibuffer input functions @code{read-from-minibuffer} and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
340 @code{completing-read} both accept an optional argument named @var{hist}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
341 which is how you specify the history list. Here are the possible
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
342 values:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
343
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
344 @table @asis
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
345 @item @var{variable}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
346 Use @var{variable} (a symbol) as the history list.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
347
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
348 @item (@var{variable} . @var{startpos})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
349 Use @var{variable} (a symbol) as the history list, and assume that the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
350 initial history position is @var{startpos} (an integer, counting from
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
351 zero which specifies the most recent element of the history).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
352
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
353 If you specify @var{startpos}, then you should also specify that element
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
354 of the history as the initial minibuffer contents, for consistency.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
355 @end table
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
356
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
357 If you don't specify @var{hist}, then the default history list
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
358 @code{minibuffer-history} is used. For other standard history lists,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
359 see below. You can also create your own history list variable; just
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
360 initialize it to @code{nil} before the first use.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
361
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
362 Both @code{read-from-minibuffer} and @code{completing-read} add new
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
363 elements to the history list automatically, and provide commands to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
364 allow the user to reuse items on the list. The only thing your program
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
365 needs to do to use a history list is to initialize it and to pass its
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
366 name to the input functions when you wish. But it is safe to modify the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
367 list by hand when the minibuffer input functions are not using it.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
368
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
369 @defvar minibuffer-history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
370 The default history list for minibuffer history input.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
371 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
372
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
373 @defvar query-replace-history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
374 A history list for arguments to @code{query-replace} (and similar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
375 arguments to other commands).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
376 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
377
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
378 @defvar file-name-history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
379 A history list for file name arguments.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
380 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
381
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
382 @defvar regexp-history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
383 A history list for regular expression arguments.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
384 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
385
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
386 @defvar extended-command-history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
387 A history list for arguments that are names of extended commands.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
388 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
389
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
390 @defvar shell-command-history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
391 A history list for arguments that are shell commands.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
392 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
393
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
394 @defvar read-expression-history
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
395 A history list for arguments that are Lisp expressions to evaluate.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
396 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
397
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
398 @node Completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
399 @section Completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
400 @cindex completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
401
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
402 @dfn{Completion} is a feature that fills in the rest of a name
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
403 starting from an abbreviation for it. Completion works by comparing the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
404 user's input against a list of valid names and determining how much of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
405 the name is determined uniquely by what the user has typed. For
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
406 example, when you type @kbd{C-x b} (@code{switch-to-buffer}) and then
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
407 type the first few letters of the name of the buffer to which you wish
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
408 to switch, and then type @key{TAB} (@code{minibuffer-complete}), Emacs
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
409 extends the name as far as it can.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
410
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
411 Standard XEmacs commands offer completion for names of symbols, files,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
412 buffers, and processes; with the functions in this section, you can
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
413 implement completion for other kinds of names.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
414
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
415 The @code{try-completion} function is the basic primitive for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
416 completion: it returns the longest determined completion of a given
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
417 initial string, with a given set of strings to match against.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
418
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
419 The function @code{completing-read} provides a higher-level interface
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
420 for completion. A call to @code{completing-read} specifies how to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
421 determine the list of valid names. The function then activates the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
422 minibuffer with a local keymap that binds a few keys to commands useful
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
423 for completion. Other functions provide convenient simple interfaces
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
424 for reading certain kinds of names with completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
425
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
426 @menu
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
427 * Basic Completion:: Low-level functions for completing strings.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
428 (These are too low level to use the minibuffer.)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
429 * Minibuffer Completion:: Invoking the minibuffer with completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
430 * Completion Commands:: Minibuffer commands that do completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
431 * High-Level Completion:: Convenient special cases of completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
432 (reading buffer name, file name, etc.)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
433 * Reading File Names:: Using completion to read file names.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
434 * Programmed Completion:: Finding the completions for a given file name.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
435 @end menu
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
436
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
437 @node Basic Completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
438 @subsection Basic Completion Functions
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
439
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
440 The two functions @code{try-completion} and @code{all-completions}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
441 have nothing in themselves to do with minibuffers. We describe them in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
442 this chapter so as to keep them near the higher-level completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
443 features that do use the minibuffer.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
444
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
445 @defun try-completion string collection &optional predicate
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
446 This function returns the longest common substring of all possible
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
447 completions of @var{string} in @var{collection}. The value of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
448 @var{collection} must be an alist, an obarray, or a function that
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
449 implements a virtual set of strings (see below).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
450
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
451 Completion compares @var{string} against each of the permissible
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
452 completions specified by @var{collection}; if the beginning of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
453 permissible completion equals @var{string}, it matches. If no permissible
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
454 completions match, @code{try-completion} returns @code{nil}. If only
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
455 one permissible completion matches, and the match is exact, then
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
456 @code{try-completion} returns @code{t}. Otherwise, the value is the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
457 longest initial sequence common to all the permissible completions that
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
458 match.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
459
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
460 If @var{collection} is an alist (@pxref{Association Lists}), the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
461 @sc{car}s of the alist elements form the set of permissible completions.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
462
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
463 @cindex obarray in completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
464 If @var{collection} is an obarray (@pxref{Creating Symbols}), the names
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
465 of all symbols in the obarray form the set of permissible completions. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
466 global variable @code{obarray} holds an obarray containing the names of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
467 all interned Lisp symbols.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
468
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
469 Note that the only valid way to make a new obarray is to create it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
470 empty and then add symbols to it one by one using @code{intern}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
471 Also, you cannot intern a given symbol in more than one obarray.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
472
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
473 If the argument @var{predicate} is non-@code{nil}, then it must be a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
474 function of one argument. It is used to test each possible match, and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
475 the match is accepted only if @var{predicate} returns non-@code{nil}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
476 The argument given to @var{predicate} is either a cons cell from the alist
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
477 (the @sc{car} of which is a string) or else it is a symbol (@emph{not} a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
478 symbol name) from the obarray.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
479
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
480 You can also use a symbol that is a function as @var{collection}. Then
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
481 the function is solely responsible for performing completion;
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
482 @code{try-completion} returns whatever this function returns. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
483 function is called with three arguments: @var{string}, @var{predicate}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
484 and @code{nil}. (The reason for the third argument is so that the same
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
485 function can be used in @code{all-completions} and do the appropriate
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
486 thing in either case.) @xref{Programmed Completion}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
487
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
488 In the first of the following examples, the string @samp{foo} is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
489 matched by three of the alist @sc{car}s. All of the matches begin with
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
490 the characters @samp{fooba}, so that is the result. In the second
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
491 example, there is only one possible match, and it is exact, so the value
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
492 is @code{t}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
493
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
494 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
495 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
496 (try-completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
497 "foo"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
498 '(("foobar1" 1) ("barfoo" 2) ("foobaz" 3) ("foobar2" 4)))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
499 @result{} "fooba"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
500 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
501
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
502 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
503 (try-completion "foo" '(("barfoo" 2) ("foo" 3)))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
504 @result{} t
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
505 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
506 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
507
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
508 In the following example, numerous symbols begin with the characters
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
509 @samp{forw}, and all of them begin with the word @samp{forward}. In
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
510 most of the symbols, this is followed with a @samp{-}, but not in all,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
511 so no more than @samp{forward} can be completed.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
512
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
513 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
514 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
515 (try-completion "forw" obarray)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
516 @result{} "forward"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
517 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
518 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
519
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
520 Finally, in the following example, only two of the three possible
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
521 matches pass the predicate @code{test} (the string @samp{foobaz} is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
522 too short). Both of those begin with the string @samp{foobar}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
523
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
524 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
525 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
526 (defun test (s)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
527 (> (length (car s)) 6))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
528 @result{} test
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
529 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
530 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
531 (try-completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
532 "foo"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
533 '(("foobar1" 1) ("barfoo" 2) ("foobaz" 3) ("foobar2" 4))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
534 'test)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
535 @result{} "foobar"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
536 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
537 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
538 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
539
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
540 @defun all-completions string collection &optional predicate nospace
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
541 This function returns a list of all possible completions of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
542 @var{string}. The parameters to this function are the same as to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
543 @code{try-completion}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
544
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
545 If @var{collection} is a function, it is called with three arguments:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
546 @var{string}, @var{predicate} and @code{t}; then @code{all-completions}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
547 returns whatever the function returns. @xref{Programmed Completion}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
548
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
549 If @var{nospace} is non-@code{nil}, completions that start with a space
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
550 are ignored unless @var{string} also starts with a space.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
551
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
552 Here is an example, using the function @code{test} shown in the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
553 example for @code{try-completion}:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
554
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
555 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
556 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
557 (defun test (s)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
558 (> (length (car s)) 6))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
559 @result{} test
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
560 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
561
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
562 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
563 (all-completions
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
564 "foo"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
565 '(("foobar1" 1) ("barfoo" 2) ("foobaz" 3) ("foobar2" 4))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
566 'test)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
567 @result{} ("foobar1" "foobar2")
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
568 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
569 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
570 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
571
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
572 @defvar completion-ignore-case
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
573 If the value of this variable is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
574 non-@code{nil}, XEmacs does not consider case significant in completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
575 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
576
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
577 @node Minibuffer Completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
578 @subsection Completion and the Minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
579
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
580 This section describes the basic interface for reading from the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
581 minibuffer with completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
582
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
583 @defun completing-read prompt collection &optional predicate require-match initial hist
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
584 This function reads a string in the minibuffer, assisting the user by
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
585 providing completion. It activates the minibuffer with prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
586 @var{prompt}, which must be a string. If @var{initial} is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
587 non-@code{nil}, @code{completing-read} inserts it into the minibuffer as
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
588 part of the input. Then it allows the user to edit the input, providing
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
589 several commands to attempt completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
590
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
591 The actual completion is done by passing @var{collection} and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
592 @var{predicate} to the function @code{try-completion}. This happens in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
593 certain commands bound in the local keymaps used for completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
594
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
595 If @var{require-match} is @code{t}, the usual minibuffer exit commands
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
596 won't exit unless the input completes to an element of @var{collection}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
597 If @var{require-match} is neither @code{nil} nor @code{t}, then the exit
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
598 commands won't exit unless the input typed is itself an element of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
599 @var{collection}. If @var{require-match} is @code{nil}, the exit
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
600 commands work regardless of the input in the minibuffer.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
601
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
602 The user can exit with null input by typing @key{RET} with an empty
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
603 minibuffer. Then @code{completing-read} returns @code{nil}. This is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
604 how the user requests whatever default the command uses for the value
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
605 being read. The user can return using @key{RET} in this way regardless
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
606 of the value of @var{require-match}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
607
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
608 The function @code{completing-read} works by calling
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
609 @code{read-minibuffer}. It uses @code{minibuffer-local-completion-map}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
610 as the keymap if @var{require-match} is @code{nil}, and uses
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
611 @code{minibuffer-local-must-match-map} if @var{require-match} is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
612 non-@code{nil}. @xref{Completion Commands}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
613
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
614 The argument @var{hist} specifies which history list variable to use for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
615 saving the input and for minibuffer history commands. It defaults to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
616 @code{minibuffer-history}. @xref{Minibuffer History}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
617
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
618 Completion ignores case when comparing the input against the possible
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
619 matches, if the built-in variable @code{completion-ignore-case} is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
620 non-@code{nil}. @xref{Basic Completion}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
621
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
622 Here's an example of using @code{completing-read}:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
623
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
624 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
625 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
626 (completing-read
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
627 "Complete a foo: "
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
628 '(("foobar1" 1) ("barfoo" 2) ("foobaz" 3) ("foobar2" 4))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
629 nil t "fo")
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
630 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
631
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
632 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
633 ;; @r{After evaluation of the preceding expression,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
634 ;; @r{the following appears in the minibuffer:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
635
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
636 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
637 Complete a foo: fo@point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
638 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
639 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
640 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
641
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
642 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
643 If the user then types @kbd{@key{DEL} @key{DEL} b @key{RET}},
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
644 @code{completing-read} returns @code{barfoo}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
645
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
646 The @code{completing-read} function binds three variables to pass
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
647 information to the commands that actually do completion. These
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
648 variables are @code{minibuffer-completion-table},
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
649 @code{minibuffer-completion-predicate} and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
650 @code{minibuffer-completion-confirm}. For more information about them,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
651 see @ref{Completion Commands}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
652 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
653
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
654 @node Completion Commands
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
655 @subsection Minibuffer Commands That Do Completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
656
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
657 This section describes the keymaps, commands and user options used in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
658 the minibuffer to do completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
659
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
660 @defvar minibuffer-local-completion-map
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
661 @code{completing-read} uses this value as the local keymap when an
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
662 exact match of one of the completions is not required. By default, this
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
663 keymap makes the following bindings:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
664
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
665 @table @asis
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
666 @item @kbd{?}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
667 @code{minibuffer-completion-help}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
668
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
669 @item @key{SPC}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
670 @code{minibuffer-complete-word}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
671
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
672 @item @key{TAB}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
673 @code{minibuffer-complete}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
674 @end table
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
675
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
676 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
677 with other characters bound as in @code{minibuffer-local-map}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
678 (@pxref{Text from Minibuffer}).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
679 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
680
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
681 @defvar minibuffer-local-must-match-map
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
682 @code{completing-read} uses this value as the local keymap when an
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
683 exact match of one of the completions is required. Therefore, no keys
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
684 are bound to @code{exit-minibuffer}, the command that exits the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
685 minibuffer unconditionally. By default, this keymap makes the following
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
686 bindings:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
687
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
688 @table @asis
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
689 @item @kbd{?}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
690 @code{minibuffer-completion-help}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
691
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
692 @item @key{SPC}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
693 @code{minibuffer-complete-word}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
694
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
695 @item @key{TAB}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
696 @code{minibuffer-complete}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
697
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
698 @item @key{LFD}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
699 @code{minibuffer-complete-and-exit}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
700
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
701 @item @key{RET}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
702 @code{minibuffer-complete-and-exit}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
703 @end table
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
704
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
705 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
706 with other characters bound as in @code{minibuffer-local-map}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
707 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
708
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
709 @defvar minibuffer-completion-table
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
710 The value of this variable is the alist or obarray used for completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
711 in the minibuffer. This is the global variable that contains what
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
712 @code{completing-read} passes to @code{try-completion}. It is used by
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
713 minibuffer completion commands such as @code{minibuffer-complete-word}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
714 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
715
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
716 @defvar minibuffer-completion-predicate
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
717 This variable's value is the predicate that @code{completing-read}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
718 passes to @code{try-completion}. The variable is also used by the other
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
719 minibuffer completion functions.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
720 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
721
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
722 @deffn Command minibuffer-complete-word
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
723 This function completes the minibuffer contents by at most a single
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
724 word. Even if the minibuffer contents have only one completion,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
725 @code{minibuffer-complete-word} does not add any characters beyond the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
726 first character that is not a word constituent. @xref{Syntax Tables}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
727 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
728
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
729 @deffn Command minibuffer-complete
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
730 This function completes the minibuffer contents as far as possible.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
731 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
732
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
733 @deffn Command minibuffer-complete-and-exit
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
734 This function completes the minibuffer contents, and exits if
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
735 confirmation is not required, i.e., if
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
736 @code{minibuffer-completion-confirm} is non-@code{nil}. If confirmation
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
737 @emph{is} required, it is given by repeating this command
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
738 immediately---the command is programmed to work without confirmation
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
739 when run twice in succession.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
740 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
741
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
742 @defvar minibuffer-completion-confirm
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
743 When the value of this variable is non-@code{nil}, XEmacs asks for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
744 confirmation of a completion before exiting the minibuffer. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
745 function @code{minibuffer-complete-and-exit} checks the value of this
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
746 variable before it exits.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
747 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
748
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
749 @deffn Command minibuffer-completion-help
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
750 This function creates a list of the possible completions of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
751 current minibuffer contents. It works by calling @code{all-completions}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
752 using the value of the variable @code{minibuffer-completion-table} as
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
753 the @var{collection} argument, and the value of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
754 @code{minibuffer-completion-predicate} as the @var{predicate} argument.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
755 The list of completions is displayed as text in a buffer named
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
756 @samp{*Completions*}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
757 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
758
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
759 @defun display-completion-list completions
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
760 This function displays @var{completions} to the stream in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
761 @code{standard-output}, usually a buffer. (@xref{Read and Print}, for more
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
762 information about streams.) The argument @var{completions} is normally
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
763 a list of completions just returned by @code{all-completions}, but it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
764 does not have to be. Each element may be a symbol or a string, either
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
765 of which is simply printed, or a list of two strings, which is printed
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
766 as if the strings were concatenated.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
767
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
768 This function is called by @code{minibuffer-completion-help}. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
769 most common way to use it is together with
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
770 @code{with-output-to-temp-buffer}, like this:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
771
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
772 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
773 (with-output-to-temp-buffer "*Completions*"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
774 (display-completion-list
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
775 (all-completions (buffer-string) my-alist)))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
776 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
777 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
778
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
779 @defopt completion-auto-help
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
780 If this variable is non-@code{nil}, the completion commands
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
781 automatically display a list of possible completions whenever nothing
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
782 can be completed because the next character is not uniquely determined.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
783 @end defopt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
784
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
785 @node High-Level Completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
786 @subsection High-Level Completion Functions
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
787
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
788 This section describes the higher-level convenient functions for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
789 reading certain sorts of names with completion.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
790
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
791 In most cases, you should not call these functions in the middle of a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
792 Lisp function. When possible, do all minibuffer input as part of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
793 reading the arguments for a command, in the @code{interactive} spec.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
794 @xref{Defining Commands}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
795
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
796 @defun read-buffer prompt &optional default existing
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
797 This function reads the name of a buffer and returns it as a string.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
798 The argument @var{default} is the default name to use, the value to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
799 return if the user exits with an empty minibuffer. If non-@code{nil},
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
800 it should be a string or a buffer. It is mentioned in the prompt, but
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
801 is not inserted in the minibuffer as initial input.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
802
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
803 If @var{existing} is non-@code{nil}, then the name specified must be
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
804 that of an existing buffer. The usual commands to exit the minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
805 do not exit if the text is not valid, and @key{RET} does completion to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
806 attempt to find a valid name. (However, @var{default} is not checked
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
807 for validity; it is returned, whatever it is, if the user exits with the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
808 minibuffer empty.)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
809
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
810 In the following example, the user enters @samp{minibuffer.t}, and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
811 then types @key{RET}. The argument @var{existing} is @code{t}, and the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
812 only buffer name starting with the given input is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
813 @samp{minibuffer.texi}, so that name is the value.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
814
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
815 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
816 (read-buffer "Buffer name? " "foo" t)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
817 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
818 ;; @r{After evaluation of the preceding expression,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
819 ;; @r{the following prompt appears,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
820 ;; @r{with an empty minibuffer:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
821 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
822
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
823 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
824 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
825 Buffer name? (default foo) @point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
826 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
827 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
828
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
829 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
830 ;; @r{The user types @kbd{minibuffer.t @key{RET}}.}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
831 @result{} "minibuffer.texi"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
832 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
833 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
834 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
835
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
836 @defun read-command prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
837 This function reads the name of a command and returns it as a Lisp
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
838 symbol. The argument @var{prompt} is used as in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
839 @code{read-from-minibuffer}. Recall that a command is anything for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
840 which @code{commandp} returns @code{t}, and a command name is a symbol
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
841 for which @code{commandp} returns @code{t}. @xref{Interactive Call}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
842
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
843 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
844 (read-command "Command name? ")
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
845
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
846 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
847 ;; @r{After evaluation of the preceding expression,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
848 ;; @r{the following prompt appears with an empty minibuffer:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
849 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
850
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
851 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
852 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
853 Command name?
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
854 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
855 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
856 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
857
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
858 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
859 If the user types @kbd{forward-c @key{RET}}, then this function returns
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
860 @code{forward-char}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
861
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
862 The @code{read-command} function is a simplified interface to the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
863 function @code{completing-read}. It uses the variable @code{obarray} so
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
864 as to complete in the set of extant Lisp symbols, and it uses the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
865 @code{commandp} predicate so as to accept only command names:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
866
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
867 @cindex @code{commandp} example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
868 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
869 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
870 (read-command @var{prompt})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
871 @equiv{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
872 (intern (completing-read @var{prompt} obarray
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
873 'commandp t nil))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
874 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
875 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
876 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
877
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
878 @defun read-variable prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
879 This function reads the name of a user variable and returns it as a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
880 symbol.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
881
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
882 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
883 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
884 (read-variable "Variable name? ")
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
885
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
886 ;; @r{After evaluation of the preceding expression,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
887 ;; @r{the following prompt appears,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
888 ;; @r{with an empty minibuffer:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
889 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
890
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
891 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
892 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
893 Variable name? @point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
894 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
895 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
896 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
897
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
898 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
899 If the user then types @kbd{fill-p @key{RET}}, @code{read-variable}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
900 returns @code{fill-prefix}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
901
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
902 This function is similar to @code{read-command}, but uses the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
903 predicate @code{user-variable-p} instead of @code{commandp}:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
904
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
905 @cindex @code{user-variable-p} example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
906 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
907 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
908 (read-variable @var{prompt})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
909 @equiv{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
910 (intern
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
911 (completing-read @var{prompt} obarray
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
912 'user-variable-p t nil))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
913 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
914 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
915 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
916
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
917 @node Reading File Names
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
918 @subsection Reading File Names
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
919
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
920 Here is another high-level completion function, designed for reading a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
921 file name. It provides special features including automatic insertion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
922 of the default directory.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
923
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
924 @defun read-file-name prompt &optional directory default existing initial
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
925 This function reads a file name in the minibuffer, prompting with
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
926 @var{prompt} and providing completion. If @var{default} is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
927 non-@code{nil}, then the function returns @var{default} if the user just
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
928 types @key{RET}. @var{default} is not checked for validity; it is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
929 returned, whatever it is, if the user exits with the minibuffer empty.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
930
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
931 If @var{existing} is non-@code{nil}, then the user must specify the name
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
932 of an existing file; @key{RET} performs completion to make the name
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
933 valid if possible, and then refuses to exit if it is not valid. If the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
934 value of @var{existing} is neither @code{nil} nor @code{t}, then
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
935 @key{RET} also requires confirmation after completion. If
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
936 @var{existing} is @code{nil}, then the name of a nonexistent file is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
937 acceptable.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
938
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
939 The argument @var{directory} specifies the directory to use for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
940 completion of relative file names. If @code{insert-default-directory}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
941 is non-@code{nil}, @var{directory} is also inserted in the minibuffer as
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
942 initial input. It defaults to the current buffer's value of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
943 @code{default-directory}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
944
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
945 @c Emacs 19 feature
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
946 If you specify @var{initial}, that is an initial file name to insert in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
947 the buffer (after with @var{directory}, if that is inserted). In this
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
948 case, point goes at the beginning of @var{initial}. The default for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
949 @var{initial} is @code{nil}---don't insert any file name. To see what
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
950 @var{initial} does, try the command @kbd{C-x C-v}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
951
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
952 Here is an example:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
953
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
954 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
955 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
956 (read-file-name "The file is ")
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
957
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
958 ;; @r{After evaluation of the preceding expression,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
959 ;; @r{the following appears in the minibuffer:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
960 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
961
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
962 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
963 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
964 The file is /gp/gnu/elisp/@point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
965 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
966 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
967 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
968
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
969 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
970 Typing @kbd{manual @key{TAB}} results in the following:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
971
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
972 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
973 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
974 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
975 The file is /gp/gnu/elisp/manual.texi@point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
976 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
977 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
978 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
979
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
980 @c Wordy to avoid overfull hbox in smallbook mode.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
981 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
982 If the user types @key{RET}, @code{read-file-name} returns the file name
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
983 as the string @code{"/gp/gnu/elisp/manual.texi"}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
984 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
985
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
986 @defopt insert-default-directory
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
987 This variable is used by @code{read-file-name}. Its value controls
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
988 whether @code{read-file-name} starts by placing the name of the default
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
989 directory in the minibuffer, plus the initial file name if any. If the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
990 value of this variable is @code{nil}, then @code{read-file-name} does
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
991 not place any initial input in the minibuffer (unless you specify
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
992 initial input with the @var{initial} argument). In that case, the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
993 default directory is still used for completion of relative file names,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
994 but is not displayed.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
995
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
996 For example:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
997
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
998 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
999 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1000 ;; @r{Here the minibuffer starts out with the default directory.}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1001 (let ((insert-default-directory t))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1002 (read-file-name "The file is "))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1003 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1004
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1005 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1006 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1007 The file is ~lewis/manual/@point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1008 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1009 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1010
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1011 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1012 ;; @r{Here the minibuffer is empty and only the prompt}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1013 ;; @r{appears on its line.}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1014 (let ((insert-default-directory nil))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1015 (read-file-name "The file is "))
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1016 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1017
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1018 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1019 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1020 The file is @point{}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1021 ---------- Buffer: Minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1022 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1023 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1024 @end defopt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1025
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1026 @node Programmed Completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1027 @subsection Programmed Completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1028 @cindex programmed completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1029
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1030 Sometimes it is not possible to create an alist or an obarray
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1031 containing all the intended possible completions. In such a case, you
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1032 can supply your own function to compute the completion of a given string.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1033 This is called @dfn{programmed completion}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1034
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1035 To use this feature, pass a symbol with a function definition as the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1036 @var{collection} argument to @code{completing-read}. The function
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1037 @code{completing-read} arranges to pass your completion function along
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1038 to @code{try-completion} and @code{all-completions}, which will then let
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1039 your function do all the work.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1040
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1041 The completion function should accept three arguments:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1042
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1043 @itemize @bullet
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1044 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1045 The string to be completed.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1046
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1047 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1048 The predicate function to filter possible matches, or @code{nil} if
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1049 none. Your function should call the predicate for each possible match,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1050 and ignore the possible match if the predicate returns @code{nil}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1051
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1052 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1053 A flag specifying the type of operation.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1054 @end itemize
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1055
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1056 There are three flag values for three operations:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1057
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1058 @itemize @bullet
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1059 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1060 @code{nil} specifies @code{try-completion}. The completion function
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1061 should return the completion of the specified string, or @code{t} if the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1062 string is an exact match already, or @code{nil} if the string matches no
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1063 possibility.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1064
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1065 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1066 @code{t} specifies @code{all-completions}. The completion function
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1067 should return a list of all possible completions of the specified
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1068 string.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1069
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1070 @item
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1071 @code{lambda} specifies a test for an exact match. The completion
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1072 function should return @code{t} if the specified string is an exact
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1073 match for some possibility; @code{nil} otherwise.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1074 @end itemize
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1075
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1076 It would be consistent and clean for completion functions to allow
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1077 lambda expressions (lists that are functions) as well as function
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1078 symbols as @var{collection}, but this is impossible. Lists as
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1079 completion tables are already assigned another meaning---as alists. It
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1080 would be unreliable to fail to handle an alist normally because it is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1081 also a possible function. So you must arrange for any function you wish
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1082 to use for completion to be encapsulated in a symbol.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1083
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1084 Emacs uses programmed completion when completing file names.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1085 @xref{File Name Completion}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1086
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1087 @node Yes-or-No Queries
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1088 @section Yes-or-No Queries
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1089 @cindex asking the user questions
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1090 @cindex querying the user
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1091 @cindex yes-or-no questions
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1092
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1093 This section describes functions used to ask the user a yes-or-no
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1094 question. The function @code{y-or-n-p} can be answered with a single
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1095 character; it is useful for questions where an inadvertent wrong answer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1096 will not have serious consequences. @code{yes-or-no-p} is suitable for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1097 more momentous questions, since it requires three or four characters to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1098 answer. Variations of these functions can be used to ask a yes-or-no
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1099 question using a dialog box, or optionally using one.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1100
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1101 If either of these functions is called in a command that was invoked
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1102 using the mouse, then it uses a dialog box or pop-up menu to ask the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1103 question. Otherwise, it uses keyboard input.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1104
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1105 Strictly speaking, @code{yes-or-no-p} uses the minibuffer and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1106 @code{y-or-n-p} does not; but it seems best to describe them together.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1107
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1108 @defun y-or-n-p prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1109 This function asks the user a question, expecting input in the echo
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1110 area. It returns @code{t} if the user types @kbd{y}, @code{nil} if the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1111 user types @kbd{n}. This function also accepts @key{SPC} to mean yes
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1112 and @key{DEL} to mean no. It accepts @kbd{C-]} to mean ``quit'', like
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1113 @kbd{C-g}, because the question might look like a minibuffer and for
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1114 that reason the user might try to use @kbd{C-]} to get out. The answer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1115 is a single character, with no @key{RET} needed to terminate it. Upper
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1116 and lower case are equivalent.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1117
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1118 ``Asking the question'' means printing @var{prompt} in the echo area,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1119 followed by the string @w{@samp{(y or n) }}. If the input is not one of
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1120 the expected answers (@kbd{y}, @kbd{n}, @kbd{@key{SPC}},
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1121 @kbd{@key{DEL}}, or something that quits), the function responds
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1122 @samp{Please answer y or n.}, and repeats the request.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1123
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1124 This function does not actually use the minibuffer, since it does not
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1125 allow editing of the answer. It actually uses the echo area (@pxref{The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1126 Echo Area}), which uses the same screen space as the minibuffer. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1127 cursor moves to the echo area while the question is being asked.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1128
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1129 The answers and their meanings, even @samp{y} and @samp{n}, are not
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1130 hardwired. The keymap @code{query-replace-map} specifies them.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1131 @xref{Search and Replace}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1132
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1133 In the following example, the user first types @kbd{q}, which is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1134 invalid. At the next prompt the user types @kbd{y}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1135
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1136 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1137 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1138 (y-or-n-p "Do you need a lift? ")
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1139
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1140 ;; @r{After evaluation of the preceding expression,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1141 ;; @r{the following prompt appears in the echo area:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1142 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1143
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1144 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1145 ---------- Echo area ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1146 Do you need a lift? (y or n)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1147 ---------- Echo area ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1148 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1149
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1150 ;; @r{If the user then types @kbd{q}, the following appears:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1151
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1152 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1153 ---------- Echo area ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1154 Please answer y or n. Do you need a lift? (y or n)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1155 ---------- Echo area ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1156 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1157
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1158 ;; @r{When the user types a valid answer,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1159 ;; @r{it is displayed after the question:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1160
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1161 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1162 ---------- Echo area ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1163 Do you need a lift? (y or n) y
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1164 ---------- Echo area ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1165 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1166 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1167
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1168 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1169 We show successive lines of echo area messages, but only one actually
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1170 appears on the screen at a time.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1171 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1172
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1173 @defun yes-or-no-p prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1174 This function asks the user a question, expecting input in the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1175 minibuffer. It returns @code{t} if the user enters @samp{yes},
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1176 @code{nil} if the user types @samp{no}. The user must type @key{RET} to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1177 finalize the response. Upper and lower case are equivalent.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1178
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1179 @code{yes-or-no-p} starts by displaying @var{prompt} in the echo area,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1180 followed by @w{@samp{(yes or no) }}. The user must type one of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1181 expected responses; otherwise, the function responds @samp{Please answer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1182 yes or no.}, waits about two seconds and repeats the request.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1183
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1184 @code{yes-or-no-p} requires more work from the user than
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1185 @code{y-or-n-p} and is appropriate for more crucial decisions.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1186
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1187 Here is an example:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1188
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1189 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1190 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1191 (yes-or-no-p "Do you really want to remove everything? ")
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1192
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1193 ;; @r{After evaluation of the preceding expression,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1194 ;; @r{the following prompt appears,}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1195 ;; @r{with an empty minibuffer:}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1196 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1197
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1198 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1199 ---------- Buffer: minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1200 Do you really want to remove everything? (yes or no)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1201 ---------- Buffer: minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1202 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1203 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1204
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1205 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1206 If the user first types @kbd{y @key{RET}}, which is invalid because this
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1207 function demands the entire word @samp{yes}, it responds by displaying
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1208 these prompts, with a brief pause between them:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1209
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1210 @smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1211 @group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1212 ---------- Buffer: minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1213 Please answer yes or no.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1214 Do you really want to remove everything? (yes or no)
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1215 ---------- Buffer: minibuffer ----------
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1216 @end group
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1217 @end smallexample
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1218 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1219
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1220 @c The rest is XEmacs stuff
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1221 @defun yes-or-no-p-dialog-box prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1222 This function asks the user a ``y or n'' question with a popup dialog
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1223 box. It returns @code{t} if the answer is ``yes''. @var{prompt} is the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1224 string to display to ask the question.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1225 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1226
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1227 The following functions ask a question either in the minibuffer or a
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1228 dialog box, depending on whether the last user event (which presumably
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1229 invoked this command) was a keyboard or mouse event. When XEmacs is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1230 running on a window system, the functions @code{y-or-n-p} and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1231 @code{yes-or-no-p} are replaced with the following functions, so that
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1232 menu items bring up dialog boxes instead of minibuffer questions.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1233
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1234 @defun y-or-n-p-maybe-dialog-box prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1235 This function asks user a ``y or n'' question, using either a dialog box
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1236 or the minibuffer, as appropriate.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1237 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1238
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1239 @defun yes-or-no-p-maybe-dialog-box prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1240 This function asks user a ``yes or no'' question, using either a dialog
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1241 box or the minibuffer, as appropriate.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1242 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1243
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1244 @node Multiple Queries
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1245 @section Asking Multiple Y-or-N Questions
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1246
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1247 When you have a series of similar questions to ask, such as ``Do you
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1248 want to save this buffer'' for each buffer in turn, you should use
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1249 @code{map-y-or-n-p} to ask the collection of questions, rather than
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1250 asking each question individually. This gives the user certain
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1251 convenient facilities such as the ability to answer the whole series at
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1252 once.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1253
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1254 @defun map-y-or-n-p prompter actor list &optional help action-alist
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1255 This function, new in Emacs 19, asks the user a series of questions,
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1256 reading a single-character answer in the echo area for each one.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1257
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1258 The value of @var{list} specifies the objects to ask questions about.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1259 It should be either a list of objects or a generator function. If it is
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1260 a function, it should expect no arguments, and should return either the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1261 next object to ask about, or @code{nil} meaning stop asking questions.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1262
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1263 The argument @var{prompter} specifies how to ask each question. If
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1264 @var{prompter} is a string, the question text is computed like this:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1265
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1266 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1267 (format @var{prompter} @var{object})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1268 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1269
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1270 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1271 where @var{object} is the next object to ask about (as obtained from
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1272 @var{list}).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1273
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1274 If not a string, @var{prompter} should be a function of one argument
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1275 (the next object to ask about) and should return the question text. If
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1276 the value is a string, that is the question to ask the user. The
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1277 function can also return @code{t} meaning do act on this object (and
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1278 don't ask the user), or @code{nil} meaning ignore this object (and don't
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1279 ask the user).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1280
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1281 The argument @var{actor} says how to act on the answers that the user
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1282 gives. It should be a function of one argument, and it is called with
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1283 each object that the user says yes for. Its argument is always an
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1284 object obtained from @var{list}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1285
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1286 If the argument @var{help} is given, it should be a list of this form:
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1287
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1288 @example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1289 (@var{singular} @var{plural} @var{action})
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1290 @end example
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1291
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1292 @noindent
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1293 where @var{singular} is a string containing a singular noun that
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1294 describes the objects conceptually being acted on, @var{plural} is the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1295 corresponding plural noun, and @var{action} is a transitive verb
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1296 describing what @var{actor} does.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1297
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1298 If you don't specify @var{help}, the default is @code{("object"
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1299 "objects" "act on")}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1300
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1301 Each time a question is asked, the user may enter @kbd{y}, @kbd{Y}, or
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1302 @key{SPC} to act on that object; @kbd{n}, @kbd{N}, or @key{DEL} to skip
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1303 that object; @kbd{!} to act on all following objects; @key{ESC} or
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1304 @kbd{q} to exit (skip all following objects); @kbd{.} (period) to act on
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1305 the current object and then exit; or @kbd{C-h} to get help. These are
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1306 the same answers that @code{query-replace} accepts. The keymap
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1307 @code{query-replace-map} defines their meaning for @code{map-y-or-n-p}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1308 as well as for @code{query-replace}; see @ref{Search and Replace}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1309
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1310 You can use @var{action-alist} to specify additional possible answers
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1311 and what they mean. It is an alist of elements of the form
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1312 @code{(@var{char} @var{function} @var{help})}, each of which defines one
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1313 additional answer. In this element, @var{char} is a character (the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1314 answer); @var{function} is a function of one argument (an object from
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1315 @var{list}); @var{help} is a string.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1316
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1317 When the user responds with @var{char}, @code{map-y-or-n-p} calls
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1318 @var{function}. If it returns non-@code{nil}, the object is considered
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1319 ``acted upon'', and @code{map-y-or-n-p} advances to the next object in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1320 @var{list}. If it returns @code{nil}, the prompt is repeated for the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1321 same object.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1322
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1323 If @code{map-y-or-n-p} is called in a command that was invoked using the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1324 mouse---more precisely, if @code{last-nonmenu-event} (@pxref{Command
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1325 Loop Info}) is either @code{nil} or a list---then it uses a dialog box
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1326 or pop-up menu to ask the question. In this case, it does not use
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1327 keyboard input or the echo area. You can force use of the mouse or use
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1328 of keyboard input by binding @code{last-nonmenu-event} to a suitable
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1329 value around the call.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1330
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1331 The return value of @code{map-y-or-n-p} is the number of objects acted on.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1332 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1333
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1334 @node Minibuffer Misc
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1335 @section Minibuffer Miscellany
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1336
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1337 This section describes some basic functions and variables related to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1338 minibuffers.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1339
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1340 @deffn Command exit-minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1341 This command exits the active minibuffer. It is normally bound to
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1342 keys in minibuffer local keymaps.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1343 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1344
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1345 @deffn Command self-insert-and-exit
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1346 This command exits the active minibuffer after inserting the last
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1347 character typed on the keyboard (found in @code{last-command-char};
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1348 @pxref{Command Loop Info}).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1349 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1350
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1351 @deffn Command previous-history-element n
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1352 This command replaces the minibuffer contents with the value of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1353 @var{n}th previous (older) history element.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1354 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1355
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1356 @deffn Command next-history-element n
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1357 This command replaces the minibuffer contents with the value of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1358 @var{n}th more recent history element.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1359 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1360
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1361 @deffn Command previous-matching-history-element pattern
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1362 This command replaces the minibuffer contents with the value of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1363 previous (older) history element that matches @var{pattern} (a regular
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1364 expression).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1365 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1366
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1367 @deffn Command next-matching-history-element pattern
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1368 This command replaces the minibuffer contents with the value of the next
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1369 (newer) history element that matches @var{pattern} (a regular
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1370 expression).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1371 @end deffn
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1372
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1373 @defun minibuffer-prompt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1374 This function returns the prompt string of the currently active
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1375 minibuffer. If no minibuffer is active, it returns @code{nil}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1376 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1377
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1378 @defun minibuffer-prompt-width
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1379 This function returns the display width of the prompt string of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1380 currently active minibuffer. If no minibuffer is active, it returns 0.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1381 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1382
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1383 @defvar minibuffer-setup-hook
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1384 This is a normal hook that is run whenever the minibuffer is entered.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1385 @xref{Hooks}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1386 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1387
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1388 @defvar minibuffer-exit-hook
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1389 This is a normal hook that is run whenever the minibuffer is exited.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1390 @xref{Hooks}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1391 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1392
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1393 @defvar minibuffer-help-form
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1394 The current value of this variable is used to rebind @code{help-form}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1395 locally inside the minibuffer (@pxref{Help Functions}).
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1396 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1397
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1398 @defun active-minibuffer-window
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1399 This function returns the currently active minibuffer window, or
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1400 @code{nil} if none is currently active.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1401 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1402
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1403 @defun minibuffer-window &optional frame
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1404 This function returns the minibuffer window used for frame @var{frame}.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1405 If @var{frame} is @code{nil}, that stands for the current frame. Note
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1406 that the minibuffer window used by a frame need not be part of that
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1407 frame---a frame that has no minibuffer of its own necessarily uses some
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1408 other frame's minibuffer window.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1409 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1410
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1411 @c Emacs 19 feature
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1412 @defun window-minibuffer-p window
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1413 This function returns non-@code{nil} if @var{window} is a minibuffer window.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1414 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1415
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1416 It is not correct to determine whether a given window is a minibuffer by
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1417 comparing it with the result of @code{(minibuffer-window)}, because
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1418 there can be more than one minibuffer window if there is more than one
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1419 frame.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1420
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1421 @defun minibuffer-window-active-p window
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1422 This function returns non-@code{nil} if @var{window}, assumed to be
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1423 a minibuffer window, is currently active.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1424 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1425
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1426 @defvar minibuffer-scroll-window
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1427 If the value of this variable is non-@code{nil}, it should be a window
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1428 object. When the function @code{scroll-other-window} is called in the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1429 minibuffer, it scrolls this window.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1430 @end defvar
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1431
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1432 Finally, some functions and variables deal with recursive minibuffers
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1433 (@pxref{Recursive Editing}):
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1434
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1435 @defun minibuffer-depth
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1436 This function returns the current depth of activations of the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1437 minibuffer, a nonnegative integer. If no minibuffers are active, it
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1438 returns zero.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1439 @end defun
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1440
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1441 @defopt enable-recursive-minibuffers
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1442 If this variable is non-@code{nil}, you can invoke commands (such as
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1443 @code{find-file}) that use minibuffers even while in the minibuffer
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1444 window. Such invocation produces a recursive editing level for a new
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1445 minibuffer. The outer-level minibuffer is invisible while you are
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1446 editing the inner one.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1447
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1448 This variable only affects invoking the minibuffer while the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1449 minibuffer window is selected. If you switch windows while in the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1450 minibuffer, you can always invoke minibuffer commands while some other
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1451 window is selected.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1452 @end defopt
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1453
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1454 @c Emacs 19 feature
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1455 In FSF Emacs 19, if a command name has a property
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1456 @code{enable-recursive-minibuffers} that is non-@code{nil}, then the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1457 command can use the minibuffer to read arguments even if it is invoked
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1458 from the minibuffer. The minibuffer command
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1459 @code{next-matching-history-element} (normally @kbd{M-s} in the
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1460 minibuffer) uses this feature.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1461
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1462 This is not implemented in XEmacs because it is a kludge. If you
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1463 want to explicitly set the value of @code{enable-recursive-minibuffers}
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1464 in this fashion, just use an evaluated interactive spec and bind
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1465 @code{enable-recursive-minibuffers} while reading from the minibuffer.
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1466 See the definition of @code{next-matching-history-element} in
376386a54a3c Import from CVS: tag r19-14
cvs
parents:
diff changeset
1467 @file{lisp/prim/minibuf.el}.