(Fx_server_vendor, Fx_server_version): Doc fixes.
[emacs.git] / lispref / commands.texi
blobf1f94e11838c592f59940da78a26a409565acf89
1 @c -*-texinfo-*-
2 @c This is part of the GNU Emacs Lisp Reference Manual.
3 @c Copyright (C) 1990, 1991, 1992, 1993, 1994, 1995, 1998, 1999, 2004
4 @c   Free Software Foundation, Inc.
5 @c See the file elisp.texi for copying conditions.
6 @setfilename ../info/commands
7 @node Command Loop, Keymaps, Minibuffers, Top
8 @chapter Command Loop
9 @cindex editor command loop
10 @cindex command loop
12   When you run Emacs, it enters the @dfn{editor command loop} almost
13 immediately.  This loop reads key sequences, executes their definitions,
14 and displays the results.  In this chapter, we describe how these things
15 are done, and the subroutines that allow Lisp programs to do them.
17 @menu
18 * Command Overview::    How the command loop reads commands.
19 * Defining Commands::   Specifying how a function should read arguments.
20 * Interactive Call::    Calling a command, so that it will read arguments.
21 * Command Loop Info::   Variables set by the command loop for you to examine.
22 * Adjusting Point::     Adjustment of point after a command.
23 * Input Events::        What input looks like when you read it.
24 * Reading Input::       How to read input events from the keyboard or mouse.
25 * Special Events::      Events processed immediately and individually.
26 * Waiting::             Waiting for user input or elapsed time.
27 * Quitting::            How @kbd{C-g} works.  How to catch or defer quitting.
28 * Prefix Command Arguments::    How the commands to set prefix args work.
29 * Recursive Editing::   Entering a recursive edit,
30                           and why you usually shouldn't.
31 * Disabling Commands::  How the command loop handles disabled commands.
32 * Command History::     How the command history is set up, and how accessed.
33 * Keyboard Macros::     How keyboard macros are implemented.
34 @end menu
36 @node Command Overview
37 @section Command Loop Overview
39   The first thing the command loop must do is read a key sequence, which
40 is a sequence of events that translates into a command.  It does this by
41 calling the function @code{read-key-sequence}.  Your Lisp code can also
42 call this function (@pxref{Key Sequence Input}).  Lisp programs can also
43 do input at a lower level with @code{read-event} (@pxref{Reading One
44 Event}) or discard pending input with @code{discard-input}
45 (@pxref{Event Input Misc}).
47   The key sequence is translated into a command through the currently
48 active keymaps.  @xref{Key Lookup}, for information on how this is done.
49 The result should be a keyboard macro or an interactively callable
50 function.  If the key is @kbd{M-x}, then it reads the name of another
51 command, which it then calls.  This is done by the command
52 @code{execute-extended-command} (@pxref{Interactive Call}).
54   To execute a command requires first reading the arguments for it.
55 This is done by calling @code{command-execute} (@pxref{Interactive
56 Call}).  For commands written in Lisp, the @code{interactive}
57 specification says how to read the arguments.  This may use the prefix
58 argument (@pxref{Prefix Command Arguments}) or may read with prompting
59 in the minibuffer (@pxref{Minibuffers}).  For example, the command
60 @code{find-file} has an @code{interactive} specification which says to
61 read a file name using the minibuffer.  The command's function body does
62 not use the minibuffer; if you call this command from Lisp code as a
63 function, you must supply the file name string as an ordinary Lisp
64 function argument.
66   If the command is a string or vector (i.e., a keyboard macro) then
67 @code{execute-kbd-macro} is used to execute it.  You can call this
68 function yourself (@pxref{Keyboard Macros}).
70   To terminate the execution of a running command, type @kbd{C-g}.  This
71 character causes @dfn{quitting} (@pxref{Quitting}).
73 @defvar pre-command-hook
74 The editor command loop runs this normal hook before each command.  At
75 that time, @code{this-command} contains the command that is about to
76 run, and @code{last-command} describes the previous command.
77 @xref{Hooks}.
78 @end defvar
80 @defvar post-command-hook
81 The editor command loop runs this normal hook after each command
82 (including commands terminated prematurely by quitting or by errors),
83 and also when the command loop is first entered.  At that time,
84 @code{this-command} describes the command that just ran, and
85 @code{last-command} describes the command before that.  @xref{Hooks}.
86 @end defvar
88   Quitting is suppressed while running @code{pre-command-hook} and
89 @code{post-command-hook}.  If an error happens while executing one of
90 these hooks, it terminates execution of the hook, and clears the hook
91 variable to @code{nil} so as to prevent an infinite loop of errors.
93   A request coming into the Emacs server (@pxref{Emacs Server,,,
94 emacs, The GNU Emacs Manual}) runs these two hooks just as a keyboard
95 command does.
97 @node Defining Commands
98 @section Defining Commands
99 @cindex defining commands
100 @cindex commands, defining
101 @cindex functions, making them interactive
102 @cindex interactive function
104   A Lisp function becomes a command when its body contains, at top
105 level, a form that calls the special form @code{interactive}.  This
106 form does nothing when actually executed, but its presence serves as a
107 flag to indicate that interactive calling is permitted.  Its argument
108 controls the reading of arguments for an interactive call.
110 @menu
111 * Using Interactive::     General rules for @code{interactive}.
112 * Interactive Codes::     The standard letter-codes for reading arguments
113                              in various ways.
114 * Interactive Examples::  Examples of how to read interactive arguments.
115 @end menu
117 @node Using Interactive
118 @subsection Using @code{interactive}
120   This section describes how to write the @code{interactive} form that
121 makes a Lisp function an interactively-callable command, and how to
122 examine a command's @code{interactive} form.
124 @defspec interactive arg-descriptor
125 @cindex argument descriptors
126 This special form declares that the function in which it appears is a
127 command, and that it may therefore be called interactively (via
128 @kbd{M-x} or by entering a key sequence bound to it).  The argument
129 @var{arg-descriptor} declares how to compute the arguments to the
130 command when the command is called interactively.
132 A command may be called from Lisp programs like any other function, but
133 then the caller supplies the arguments and @var{arg-descriptor} has no
134 effect.
136 The @code{interactive} form has its effect because the command loop
137 (actually, its subroutine @code{call-interactively}) scans through the
138 function definition looking for it, before calling the function.  Once
139 the function is called, all its body forms including the
140 @code{interactive} form are executed, but at this time
141 @code{interactive} simply returns @code{nil} without even evaluating its
142 argument.
143 @end defspec
145 There are three possibilities for the argument @var{arg-descriptor}:
147 @itemize @bullet
148 @item
149 It may be omitted or @code{nil}; then the command is called with no
150 arguments.  This leads quickly to an error if the command requires one
151 or more arguments.
153 @item
154 It may be a Lisp expression that is not a string; then it should be a
155 form that is evaluated to get a list of arguments to pass to the
156 command.
157 @cindex argument evaluation form
159 If this expression reads keyboard input (this includes using the
160 minibuffer), keep in mind that the integer value of point or the mark
161 before reading input may be incorrect after reading input.  This is
162 because the current buffer may be receiving subprocess output;
163 if subprocess output arrives while the command is waiting for input,
164 it could relocate point and the mark.
166 Here's an example of what @emph{not} to do:
168 @smallexample
169 (interactive
170  (list (region-beginning) (region-end)
171        (read-string "Foo: " nil 'my-history)))
172 @end smallexample
174 @noindent
175 Here's how to avoid the problem, by examining point and the mark only
176 after reading the keyboard input:
178 @smallexample
179 (interactive
180  (let ((string (read-string "Foo: " nil 'my-history)))
181    (list (region-beginning) (region-end) string)))
182 @end smallexample
184 @item
185 @cindex argument prompt
186 It may be a string; then its contents should consist of a code character
187 followed by a prompt (which some code characters use and some ignore).
188 The prompt ends either with the end of the string or with a newline.
189 Here is a simple example:
191 @smallexample
192 (interactive "bFrobnicate buffer: ")
193 @end smallexample
195 @noindent
196 The code letter @samp{b} says to read the name of an existing buffer,
197 with completion.  The buffer name is the sole argument passed to the
198 command.  The rest of the string is a prompt.
200 If there is a newline character in the string, it terminates the prompt.
201 If the string does not end there, then the rest of the string should
202 contain another code character and prompt, specifying another argument.
203 You can specify any number of arguments in this way.
205 @c Emacs 19 feature
206 The prompt string can use @samp{%} to include previous argument values
207 (starting with the first argument) in the prompt.  This is done using
208 @code{format} (@pxref{Formatting Strings}).  For example, here is how
209 you could read the name of an existing buffer followed by a new name to
210 give to that buffer:
212 @smallexample
213 @group
214 (interactive "bBuffer to rename: \nsRename buffer %s to: ")
215 @end group
216 @end smallexample
218 @cindex @samp{*} in @code{interactive}
219 @cindex read-only buffers in interactive
220 If the first character in the string is @samp{*}, then an error is
221 signaled if the buffer is read-only.
223 @cindex @samp{@@} in @code{interactive}
224 @c Emacs 19 feature
225 If the first character in the string is @samp{@@}, and if the key
226 sequence used to invoke the command includes any mouse events, then
227 the window associated with the first of those events is selected
228 before the command is run.
230 You can use @samp{*} and @samp{@@} together; the order does not matter.
231 Actual reading of arguments is controlled by the rest of the prompt
232 string (starting with the first character that is not @samp{*} or
233 @samp{@@}).
234 @end itemize
236 @cindex examining the @code{interactive} form
237 @defun interactive-form function
238 This function returns the @code{interactive} form of @var{function}.
239 If @var{function} is an interactively callable function
240 (@pxref{Interactive Call}), the value is the command's
241 @code{interactive} form @code{(interactive @var{spec})}, which
242 specifies how to compute its arguments.  Otherwise, the value is
243 @code{nil}.  If @var{function} is a symbol, its function definition is
244 used.
245 @end defun
247 @node Interactive Codes
248 @comment  node-name,  next,  previous,  up
249 @subsection Code Characters for @code{interactive}
250 @cindex interactive code description
251 @cindex description for interactive codes
252 @cindex codes, interactive, description of
253 @cindex characters for interactive codes
255   The code character descriptions below contain a number of key words,
256 defined here as follows:
258 @table @b
259 @item Completion
260 @cindex interactive completion
261 Provide completion.  @key{TAB}, @key{SPC}, and @key{RET} perform name
262 completion because the argument is read using @code{completing-read}
263 (@pxref{Completion}).  @kbd{?} displays a list of possible completions.
265 @item Existing
266 Require the name of an existing object.  An invalid name is not
267 accepted; the commands to exit the minibuffer do not exit if the current
268 input is not valid.
270 @item Default
271 @cindex default argument string
272 A default value of some sort is used if the user enters no text in the
273 minibuffer.  The default depends on the code character.
275 @item No I/O
276 This code letter computes an argument without reading any input.
277 Therefore, it does not use a prompt string, and any prompt string you
278 supply is ignored.
280 Even though the code letter doesn't use a prompt string, you must follow
281 it with a newline if it is not the last code character in the string.
283 @item Prompt
284 A prompt immediately follows the code character.  The prompt ends either
285 with the end of the string or with a newline.
287 @item Special
288 This code character is meaningful only at the beginning of the
289 interactive string, and it does not look for a prompt or a newline.
290 It is a single, isolated character.
291 @end table
293 @cindex reading interactive arguments
294   Here are the code character descriptions for use with @code{interactive}:
296 @table @samp
297 @item *
298 Signal an error if the current buffer is read-only.  Special.
300 @item @@
301 Select the window mentioned in the first mouse event in the key
302 sequence that invoked this command.  Special.
304 @item a
305 A function name (i.e., a symbol satisfying @code{fboundp}).  Existing,
306 Completion, Prompt.
308 @item b
309 The name of an existing buffer.  By default, uses the name of the
310 current buffer (@pxref{Buffers}).  Existing, Completion, Default,
311 Prompt.
313 @item B
314 A buffer name.  The buffer need not exist.  By default, uses the name of
315 a recently used buffer other than the current buffer.  Completion,
316 Default, Prompt.
318 @item c
319 A character.  The cursor does not move into the echo area.  Prompt.
321 @item C
322 A command name (i.e., a symbol satisfying @code{commandp}).  Existing,
323 Completion, Prompt.
325 @item d
326 @cindex position argument
327 The position of point, as an integer (@pxref{Point}).  No I/O.
329 @item D
330 A directory name.  The default is the current default directory of the
331 current buffer, @code{default-directory} (@pxref{File Name Expansion}).
332 Existing, Completion, Default, Prompt.
334 @item e
335 The first or next mouse event in the key sequence that invoked the command.
336 More precisely, @samp{e} gets events that are lists, so you can look at
337 the data in the lists.  @xref{Input Events}.  No I/O.
339 You can use @samp{e} more than once in a single command's interactive
340 specification.  If the key sequence that invoked the command has
341 @var{n} events that are lists, the @var{n}th @samp{e} provides the
342 @var{n}th such event.  Events that are not lists, such as function keys
343 and @acronym{ASCII} characters, do not count where @samp{e} is concerned.
345 @item f
346 A file name of an existing file (@pxref{File Names}).  The default
347 directory is @code{default-directory}.  Existing, Completion, Default,
348 Prompt.
350 @item F
351 A file name.  The file need not exist.  Completion, Default, Prompt.
353 @item i
354 An irrelevant argument.  This code always supplies @code{nil} as
355 the argument's value.  No I/O.
357 @item k
358 A key sequence (@pxref{Keymap Terminology}).  This keeps reading events
359 until a command (or undefined command) is found in the current key
360 maps.  The key sequence argument is represented as a string or vector.
361 The cursor does not move into the echo area.  Prompt.
363 If the key sequence is a down-event, the following up-event is discarded,
364 but can be read via the @code{U} code character.
366 This kind of input is used by commands such as @code{describe-key} and
367 @code{global-set-key}.
369 @item K
370 A key sequence, whose definition you intend to change.  This works like
371 @samp{k}, except that it suppresses, for the last input event in the key
372 sequence, the conversions that are normally used (when necessary) to
373 convert an undefined key into a defined one.
375 @item m
376 @cindex marker argument
377 The position of the mark, as an integer.  No I/O.
379 @item M
380 Arbitrary text, read in the minibuffer using the current buffer's input
381 method, and returned as a string (@pxref{Input Methods,,, emacs, The GNU
382 Emacs Manual}).  Prompt.
384 @item n
385 A number, read with the minibuffer.  If the input is not a number, the
386 user has to try again.  @samp{n} never uses the prefix argument.
387 Prompt.
389 @item N
390 The numeric prefix argument; but if there is no prefix argument, read
391 a number as with @kbd{n}.  The value is always a number.  @xref{Prefix
392 Command Arguments}.  Prompt.
394 @item p
395 @cindex numeric prefix argument usage
396 The numeric prefix argument.  (Note that this @samp{p} is lower case.)
397 No I/O.
399 @item P
400 @cindex raw prefix argument usage
401 The raw prefix argument.  (Note that this @samp{P} is upper case.)  No
402 I/O.
404 @item r
405 @cindex region argument
406 Point and the mark, as two numeric arguments, smallest first.  This is
407 the only code letter that specifies two successive arguments rather than
408 one.  No I/O.
410 @item s
411 Arbitrary text, read in the minibuffer and returned as a string
412 (@pxref{Text from Minibuffer}).  Terminate the input with either
413 @kbd{C-j} or @key{RET}.  (@kbd{C-q} may be used to include either of
414 these characters in the input.)  Prompt.
416 @item S
417 An interned symbol whose name is read in the minibuffer.  Any whitespace
418 character terminates the input.  (Use @kbd{C-q} to include whitespace in
419 the string.)  Other characters that normally terminate a symbol (e.g.,
420 parentheses and brackets) do not do so here.  Prompt.
422 @item U
423 A key sequence or nil.  May be used after a @code{k} or @code{K}
424 argument to get the up-event that was discarded in case the key
425 sequence read for that argument was a down-event.  No I/O.
427 @item v
428 A variable declared to be a user option (i.e., satisfying the
429 predicate @code{user-variable-p}).  This reads the variable using
430 @code{read-variable}.  @xref{Definition of read-variable}.  Existing,
431 Completion, Prompt.
433 @item x
434 A Lisp object, specified with its read syntax, terminated with a
435 @kbd{C-j} or @key{RET}.  The object is not evaluated.  @xref{Object from
436 Minibuffer}.  Prompt.
438 @item X
439 @cindex evaluated expression argument
440 A Lisp form is read as with @kbd{x}, but then evaluated so that its
441 value becomes the argument for the command.  Prompt.
443 @item z
444 A coding system name (a symbol).  If the user enters null input, the
445 argument value is @code{nil}.  @xref{Coding Systems}.  Completion,
446 Existing, Prompt.
448 @item Z
449 A coding system name (a symbol)---but only if this command has a prefix
450 argument.  With no prefix argument, @samp{Z} provides @code{nil} as the
451 argument value.  Completion, Existing, Prompt.
452 @end table
454 @node Interactive Examples
455 @comment  node-name,  next,  previous,  up
456 @subsection Examples of Using @code{interactive}
457 @cindex examples of using @code{interactive}
458 @cindex @code{interactive}, examples of using
460   Here are some examples of @code{interactive}:
462 @example
463 @group
464 (defun foo1 ()              ; @r{@code{foo1} takes no arguments,}
465     (interactive)           ;   @r{just moves forward two words.}
466     (forward-word 2))
467      @result{} foo1
468 @end group
470 @group
471 (defun foo2 (n)             ; @r{@code{foo2} takes one argument,}
472     (interactive "p")       ;   @r{which is the numeric prefix.}
473     (forward-word (* 2 n)))
474      @result{} foo2
475 @end group
477 @group
478 (defun foo3 (n)             ; @r{@code{foo3} takes one argument,}
479     (interactive "nCount:") ;   @r{which is read with the Minibuffer.}
480     (forward-word (* 2 n)))
481      @result{} foo3
482 @end group
484 @group
485 (defun three-b (b1 b2 b3)
486   "Select three existing buffers.
487 Put them into three windows, selecting the last one."
488 @end group
489     (interactive "bBuffer1:\nbBuffer2:\nbBuffer3:")
490     (delete-other-windows)
491     (split-window (selected-window) 8)
492     (switch-to-buffer b1)
493     (other-window 1)
494     (split-window (selected-window) 8)
495     (switch-to-buffer b2)
496     (other-window 1)
497     (switch-to-buffer b3))
498      @result{} three-b
499 @group
500 (three-b "*scratch*" "declarations.texi" "*mail*")
501      @result{} nil
502 @end group
503 @end example
505 @node Interactive Call
506 @section Interactive Call
507 @cindex interactive call
509   After the command loop has translated a key sequence into a command it
510 invokes that command using the function @code{command-execute}.  If the
511 command is a function, @code{command-execute} calls
512 @code{call-interactively}, which reads the arguments and calls the
513 command.  You can also call these functions yourself.
515 @defun commandp object &optional for-call-interactively
516 Returns @code{t} if @var{object} is suitable for calling interactively;
517 that is, if @var{object} is a command.  Otherwise, returns @code{nil}.
519 The interactively callable objects include strings and vectors (treated
520 as keyboard macros), lambda expressions that contain a top-level call to
521 @code{interactive}, byte-code function objects made from such lambda
522 expressions, autoload objects that are declared as interactive
523 (non-@code{nil} fourth argument to @code{autoload}), and some of the
524 primitive functions.
526 A symbol satisfies @code{commandp} if its function definition
527 satisfies @code{commandp}.  Keys and keymaps are not commands.
528 Rather, they are used to look up commands (@pxref{Keymaps}).
530 If @var{for-call-interactively} is non-@code{nil}, then
531 @code{commandp} returns @code{t} only for objects that
532 @code{call-interactively} could call---thus, not for keyboard macros.
534 See @code{documentation} in @ref{Accessing Documentation}, for a
535 realistic example of using @code{commandp}.
536 @end defun
538 @defun call-interactively command &optional record-flag keys
539 This function calls the interactively callable function @var{command},
540 reading arguments according to its interactive calling specifications.
541 It returns whatever @var{command} returns.  An error is signaled if
542 @var{command} is not a function or if it cannot be called
543 interactively (i.e., is not a command).  Note that keyboard macros
544 (strings and vectors) are not accepted, even though they are
545 considered commands, because they are not functions.  If @var{command}
546 is a symbol, then @code{call-interactively} uses its function definition.
548 @cindex record command history
549 If @var{record-flag} is non-@code{nil}, then this command and its
550 arguments are unconditionally added to the list @code{command-history}.
551 Otherwise, the command is added only if it uses the minibuffer to read
552 an argument.  @xref{Command History}.
554 The argument @var{keys}, if given, specifies the sequence of events to
555 supply if the command inquires which events were used to invoke it.
556 If @var{keys} is omitted or @code{nil}, the return value of
557 @code{this-command-keys} is used.  @xref{Definition of this-command-keys}.
558 @end defun
560 @defun command-execute command &optional record-flag keys special
561 @cindex keyboard macro execution
562 This function executes @var{command}.  The argument @var{command} must
563 satisfy the @code{commandp} predicate; i.e., it must be an interactively
564 callable function or a keyboard macro.
566 A string or vector as @var{command} is executed with
567 @code{execute-kbd-macro}.  A function is passed to
568 @code{call-interactively}, along with the optional @var{record-flag}
569 and @var{keys}.
571 A symbol is handled by using its function definition in its place.  A
572 symbol with an @code{autoload} definition counts as a command if it was
573 declared to stand for an interactively callable function.  Such a
574 definition is handled by loading the specified library and then
575 rechecking the definition of the symbol.
577 The argument @var{special}, if given, means to ignore the prefix
578 argument and not clear it.  This is used for executing special events
579 (@pxref{Special Events}).
580 @end defun
582 @deffn Command execute-extended-command prefix-argument
583 @cindex read command name
584 This function reads a command name from the minibuffer using
585 @code{completing-read} (@pxref{Completion}).  Then it uses
586 @code{command-execute} to call the specified command.  Whatever that
587 command returns becomes the value of @code{execute-extended-command}.
589 @cindex execute with prefix argument
590 If the command asks for a prefix argument, it receives the value
591 @var{prefix-argument}.  If @code{execute-extended-command} is called
592 interactively, the current raw prefix argument is used for
593 @var{prefix-argument}, and thus passed on to whatever command is run.
595 @c !!! Should this be @kindex?
596 @cindex @kbd{M-x}
597 @code{execute-extended-command} is the normal definition of @kbd{M-x},
598 so it uses the string @w{@samp{M-x }} as a prompt.  (It would be better
599 to take the prompt from the events used to invoke
600 @code{execute-extended-command}, but that is painful to implement.)  A
601 description of the value of the prefix argument, if any, also becomes
602 part of the prompt.
604 @example
605 @group
606 (execute-extended-command 1)
607 ---------- Buffer: Minibuffer ----------
608 1 M-x forward-word RET
609 ---------- Buffer: Minibuffer ----------
610      @result{} t
611 @end group
612 @end example
613 @end deffn
615 @defun interactive-p
616 This function returns @code{t} if the containing function (the one
617 whose code includes the call to @code{interactive-p}) was called in
618 direct response to user input.  This means that it was called with the
619 function @code{call-interactively}, and that a keyboard macro is
620 not running.
622 If the containing function was called by Lisp evaluation (or with
623 @code{apply} or @code{funcall}), then it was not called interactively.
624 @end defun
626   The most common use of @code{interactive-p} is for deciding whether
627 to give the user additional visual feedback (such as by printing an
628 informative message).  For example:
630 @example
631 @group
632 ;; @r{Here's the usual way to use @code{interactive-p}.}
633 (defun foo ()
634   (interactive)
635   (when (interactive-p)
636     (message "foo")))
637      @result{} foo
638 @end group
640 @group
641 ;; @r{This function is just to illustrate the behavior.}
642 (defun bar ()
643   (interactive)
644   (setq foobar (list (foo) (interactive-p))))
645      @result{} bar
646 @end group
648 @group
649 ;; @r{Type @kbd{M-x foo}.}
650      @print{} foo
651 @end group
653 @group
654 ;; @r{Type @kbd{M-x bar}.}
655 ;; @r{This does not display a message.}
656 @end group
658 @group
659 foobar
660      @result{} (nil t)
661 @end group
662 @end example
664   If you want to test @emph{only} whether the function was called
665 using @code{call-interactively}, add an optional argument
666 @code{print-message} which should be non-@code{nil} in an interactive
667 call, and use the @code{interactive} spec to make sure it is
668 non-@code{nil}.  Here's an example:
670 @example
671 (defun foo (&optional print-message)
672   (interactive "p")
673   (when print-message
674     (message "foo")))
675 @end example
677 @noindent
678 Defined in this way, the function does display the message when called
679 from a keyboard macro.  We use @code{"p"} because the numeric prefix
680 argument is never @code{nil}.
682 @node Command Loop Info
683 @comment  node-name,  next,  previous,  up
684 @section Information from the Command Loop
686 The editor command loop sets several Lisp variables to keep status
687 records for itself and for commands that are run.
689 @defvar last-command
690 This variable records the name of the previous command executed by the
691 command loop (the one before the current command).  Normally the value
692 is a symbol with a function definition, but this is not guaranteed.
694 The value is copied from @code{this-command} when a command returns to
695 the command loop, except when the command has specified a prefix
696 argument for the following command.
698 This variable is always local to the current terminal and cannot be
699 buffer-local.  @xref{Multiple Displays}.
700 @end defvar
702 @defvar real-last-command
703 This variable is set up by Emacs just like @code{last-command},
704 but never altered by Lisp programs.
705 @end defvar
707 @defvar this-command
708 @cindex current command
709 This variable records the name of the command now being executed by
710 the editor command loop.  Like @code{last-command}, it is normally a symbol
711 with a function definition.
713 The command loop sets this variable just before running a command, and
714 copies its value into @code{last-command} when the command finishes
715 (unless the command specified a prefix argument for the following
716 command).
718 @cindex kill command repetition
719 Some commands set this variable during their execution, as a flag for
720 whatever command runs next.  In particular, the functions for killing text
721 set @code{this-command} to @code{kill-region} so that any kill commands
722 immediately following will know to append the killed text to the
723 previous kill.
724 @end defvar
726 If you do not want a particular command to be recognized as the previous
727 command in the case where it got an error, you must code that command to
728 prevent this.  One way is to set @code{this-command} to @code{t} at the
729 beginning of the command, and set @code{this-command} back to its proper
730 value at the end, like this:
732 @example
733 (defun foo (args@dots{})
734   (interactive @dots{})
735   (let ((old-this-command this-command))
736     (setq this-command t)
737     @r{@dots{}do the work@dots{}}
738     (setq this-command old-this-command)))
739 @end example
741 @noindent
742 We do not bind @code{this-command} with @code{let} because that would
743 restore the old value in case of error---a feature of @code{let} which
744 in this case does precisely what we want to avoid.
746 @defvar this-original-command
747 This has the same value as @code{this-command} except when command
748 remapping occurs (@pxref{Remapping Commands}).  In that case,
749 @code{this-command} gives the command actually run (the result of
750 remapping), and @code{this-original-command} gives the command that
751 was specified to run but remapped into another command.
752 @end defvar
754 @defun this-command-keys
755 @anchor{Definition of this-command-keys}
756 This function returns a string or vector containing the key sequence
757 that invoked the present command, plus any previous commands that
758 generated the prefix argument for this command.  However, if the
759 command has called @code{read-key-sequence}, it returns the last read
760 key sequence.  @xref{Key Sequence Input}.  The value is a string if
761 all events in the sequence were characters that fit in a string.
762 @xref{Input Events}.
764 @example
765 @group
766 (this-command-keys)
767 ;; @r{Now use @kbd{C-u C-x C-e} to evaluate that.}
768      @result{} "^U^X^E"
769 @end group
770 @end example
771 @end defun
773 @defun this-command-keys-vector
774 Like @code{this-command-keys}, except that it always returns the events
775 in a vector, so you don't need to deal with the complexities of storing
776 input events in a string (@pxref{Strings of Events}).
777 @end defun
779 @tindex clear-this-command-keys
780 @defun clear-this-command-keys &optional keep-record
781 This function empties out the table of events for
782 @code{this-command-keys} to return.  Unless @var{keep-record} is
783 non-@code{nil}, it also empties the records that the function
784 @code{recent-keys} (@pxref{Recording Input}) will subsequently return.
785 This is useful after reading a password, to prevent the password from
786 echoing inadvertently as part of the next command in certain cases.
787 @end defun
789 @defvar last-nonmenu-event
790 This variable holds the last input event read as part of a key sequence,
791 not counting events resulting from mouse menus.
793 One use of this variable is for telling @code{x-popup-menu} where to pop
794 up a menu.  It is also used internally by @code{y-or-n-p}
795 (@pxref{Yes-or-No Queries}).
796 @end defvar
798 @defvar last-command-event
799 @defvarx last-command-char
800 This variable is set to the last input event that was read by the
801 command loop as part of a command.  The principal use of this variable
802 is in @code{self-insert-command}, which uses it to decide which
803 character to insert.
805 @example
806 @group
807 last-command-event
808 ;; @r{Now use @kbd{C-u C-x C-e} to evaluate that.}
809      @result{} 5
810 @end group
811 @end example
813 @noindent
814 The value is 5 because that is the @acronym{ASCII} code for @kbd{C-e}.
816 The alias @code{last-command-char} exists for compatibility with
817 Emacs version 18.
818 @end defvar
820 @c Emacs 19 feature
821 @defvar last-event-frame
822 This variable records which frame the last input event was directed to.
823 Usually this is the frame that was selected when the event was
824 generated, but if that frame has redirected input focus to another
825 frame, the value is the frame to which the event was redirected.
826 @xref{Input Focus}.
828 If the last event came from a keyboard macro, the value is @code{macro}.
829 @end defvar
831 @node Adjusting Point
832 @section Adjusting Point After Commands
834   It is not easy to display a value of point in the middle of a sequence
835 of text that has the @code{display} or @code{composition} property.  So
836 after a command finishes and returns to the command loop, if point is
837 within such a sequence, the command loop normally moves point to the
838 edge of the sequence.
840   A command can inhibit this feature by setting the variable
841 @code{disable-point-adjustment}:
843 @defvar disable-point-adjustment
844 @tindex disable-point-adjustment
845 If this variable is non-@code{nil} when a command returns to the command
846 loop, then the command loop does not check for text properties such as
847 @code{display} and @code{composition}, and does not move point out of
848 sequences that have these properties.
850 The command loop sets this variable to @code{nil} before each command,
851 so if a command sets it, the effect applies only to that command.
852 @end defvar
854 @defvar global-disable-point-adjustment
855 @tindex global-disable-point-adjustment
856 If you set this variable to a non-@code{nil} value, the feature of
857 moving point out of these sequences is completely turned off.
858 @end defvar
860 @node Input Events
861 @section Input Events
862 @cindex events
863 @cindex input events
865 The Emacs command loop reads a sequence of @dfn{input events} that
866 represent keyboard or mouse activity.  The events for keyboard activity
867 are characters or symbols; mouse events are always lists.  This section
868 describes the representation and meaning of input events in detail.
870 @defun eventp object
871 This function returns non-@code{nil} if @var{object} is an input event
872 or event type.
874 Note that any symbol might be used as an event or an event type.
875 @code{eventp} cannot distinguish whether a symbol is intended by Lisp
876 code to be used as an event.  Instead, it distinguishes whether the
877 symbol has actually been used in an event that has been read as input in
878 the current Emacs session.  If a symbol has not yet been so used,
879 @code{eventp} returns @code{nil}.
880 @end defun
882 @menu
883 * Keyboard Events::             Ordinary characters--keys with symbols on them.
884 * Function Keys::               Function keys--keys with names, not symbols.
885 * Mouse Events::                Overview of mouse events.
886 * Click Events::                Pushing and releasing a mouse button.
887 * Drag Events::                 Moving the mouse before releasing the button.
888 * Button-Down Events::          A button was pushed and not yet released.
889 * Repeat Events::               Double and triple click (or drag, or down).
890 * Motion Events::               Just moving the mouse, not pushing a button.
891 * Focus Events::                Moving the mouse between frames.
892 * Misc Events::                 Other events the system can generate.
893 * Event Examples::              Examples of the lists for mouse events.
894 * Classifying Events::          Finding the modifier keys in an event symbol.
895                                 Event types.
896 * Accessing Events::            Functions to extract info from events.
897 * Strings of Events::           Special considerations for putting
898                                   keyboard character events in a string.
899 @end menu
901 @node Keyboard Events
902 @subsection Keyboard Events
904 There are two kinds of input you can get from the keyboard: ordinary
905 keys, and function keys.  Ordinary keys correspond to characters; the
906 events they generate are represented in Lisp as characters.  The event
907 type of a character event is the character itself (an integer); see
908 @ref{Classifying Events}.
910 @cindex modifier bits (of input character)
911 @cindex basic code (of input character)
912 An input character event consists of a @dfn{basic code} between 0 and
913 524287, plus any or all of these @dfn{modifier bits}:
915 @table @asis
916 @item meta
918 @tex
919 @math{2^{27}}
920 @end tex
921 @ifnottex
922 2**27
923 @end ifnottex
924 bit in the character code indicates a character
925 typed with the meta key held down.
927 @item control
929 @tex
930 @math{2^{26}}
931 @end tex
932 @ifnottex
933 2**26
934 @end ifnottex
935 bit in the character code indicates a non-@acronym{ASCII}
936 control character.
938 @sc{ascii} control characters such as @kbd{C-a} have special basic
939 codes of their own, so Emacs needs no special bit to indicate them.
940 Thus, the code for @kbd{C-a} is just 1.
942 But if you type a control combination not in @acronym{ASCII}, such as
943 @kbd{%} with the control key, the numeric value you get is the code
944 for @kbd{%} plus
945 @tex
946 @math{2^{26}}
947 @end tex
948 @ifnottex
949 2**26
950 @end ifnottex
951 (assuming the terminal supports non-@acronym{ASCII}
952 control characters).
954 @item shift
956 @tex
957 @math{2^{25}}
958 @end tex
959 @ifnottex
960 2**25
961 @end ifnottex
962 bit in the character code indicates an @acronym{ASCII} control
963 character typed with the shift key held down.
965 For letters, the basic code itself indicates upper versus lower case;
966 for digits and punctuation, the shift key selects an entirely different
967 character with a different basic code.  In order to keep within the
968 @acronym{ASCII} character set whenever possible, Emacs avoids using the
969 @tex
970 @math{2^{25}}
971 @end tex
972 @ifnottex
973 2**25
974 @end ifnottex
975 bit for those characters.
977 However, @acronym{ASCII} provides no way to distinguish @kbd{C-A} from
978 @kbd{C-a}, so Emacs uses the
979 @tex
980 @math{2^{25}}
981 @end tex
982 @ifnottex
983 2**25
984 @end ifnottex
985 bit in @kbd{C-A} and not in
986 @kbd{C-a}.
988 @item hyper
990 @tex
991 @math{2^{24}}
992 @end tex
993 @ifnottex
994 2**24
995 @end ifnottex
996 bit in the character code indicates a character
997 typed with the hyper key held down.
999 @item super
1001 @tex
1002 @math{2^{23}}
1003 @end tex
1004 @ifnottex
1005 2**23
1006 @end ifnottex
1007 bit in the character code indicates a character
1008 typed with the super key held down.
1010 @item alt
1012 @tex
1013 @math{2^{22}}
1014 @end tex
1015 @ifnottex
1016 2**22
1017 @end ifnottex
1018 bit in the character code indicates a character typed with
1019 the alt key held down.  (On some terminals, the key labeled @key{ALT}
1020 is actually the meta key.)
1021 @end table
1023   It is best to avoid mentioning specific bit numbers in your program.
1024 To test the modifier bits of a character, use the function
1025 @code{event-modifiers} (@pxref{Classifying Events}).  When making key
1026 bindings, you can use the read syntax for characters with modifier bits
1027 (@samp{\C-}, @samp{\M-}, and so on).  For making key bindings with
1028 @code{define-key}, you can use lists such as @code{(control hyper ?x)} to
1029 specify the characters (@pxref{Changing Key Bindings}).  The function
1030 @code{event-convert-list} converts such a list into an event type
1031 (@pxref{Classifying Events}).
1033 @node Function Keys
1034 @subsection Function Keys
1036 @cindex function keys
1037 Most keyboards also have @dfn{function keys}---keys that have names or
1038 symbols that are not characters.  Function keys are represented in Emacs
1039 Lisp as symbols; the symbol's name is the function key's label, in lower
1040 case.  For example, pressing a key labeled @key{F1} places the symbol
1041 @code{f1} in the input stream.
1043 The event type of a function key event is the event symbol itself.
1044 @xref{Classifying Events}.
1046 Here are a few special cases in the symbol-naming convention for
1047 function keys:
1049 @table @asis
1050 @item @code{backspace}, @code{tab}, @code{newline}, @code{return}, @code{delete}
1051 These keys correspond to common @acronym{ASCII} control characters that have
1052 special keys on most keyboards.
1054 In @acronym{ASCII}, @kbd{C-i} and @key{TAB} are the same character.  If the
1055 terminal can distinguish between them, Emacs conveys the distinction to
1056 Lisp programs by representing the former as the integer 9, and the
1057 latter as the symbol @code{tab}.
1059 Most of the time, it's not useful to distinguish the two.  So normally
1060 @code{function-key-map} (@pxref{Translating Input}) is set up to map
1061 @code{tab} into 9.  Thus, a key binding for character code 9 (the
1062 character @kbd{C-i}) also applies to @code{tab}.  Likewise for the other
1063 symbols in this group.  The function @code{read-char} likewise converts
1064 these events into characters.
1066 In @acronym{ASCII}, @key{BS} is really @kbd{C-h}.  But @code{backspace}
1067 converts into the character code 127 (@key{DEL}), not into code 8
1068 (@key{BS}).  This is what most users prefer.
1070 @item @code{left}, @code{up}, @code{right}, @code{down}
1071 Cursor arrow keys
1072 @item @code{kp-add}, @code{kp-decimal}, @code{kp-divide}, @dots{}
1073 Keypad keys (to the right of the regular keyboard).
1074 @item @code{kp-0}, @code{kp-1}, @dots{}
1075 Keypad keys with digits.
1076 @item @code{kp-f1}, @code{kp-f2}, @code{kp-f3}, @code{kp-f4}
1077 Keypad PF keys.
1078 @item @code{kp-home}, @code{kp-left}, @code{kp-up}, @code{kp-right}, @code{kp-down}
1079 Keypad arrow keys.  Emacs normally translates these into the
1080 corresponding non-keypad keys @code{home}, @code{left}, @dots{}
1081 @item @code{kp-prior}, @code{kp-next}, @code{kp-end}, @code{kp-begin}, @code{kp-insert}, @code{kp-delete}
1082 Additional keypad duplicates of keys ordinarily found elsewhere.  Emacs
1083 normally translates these into the like-named non-keypad keys.
1084 @end table
1086 You can use the modifier keys @key{ALT}, @key{CTRL}, @key{HYPER},
1087 @key{META}, @key{SHIFT}, and @key{SUPER} with function keys.  The way to
1088 represent them is with prefixes in the symbol name:
1090 @table @samp
1091 @item A-
1092 The alt modifier.
1093 @item C-
1094 The control modifier.
1095 @item H-
1096 The hyper modifier.
1097 @item M-
1098 The meta modifier.
1099 @item S-
1100 The shift modifier.
1101 @item s-
1102 The super modifier.
1103 @end table
1105 Thus, the symbol for the key @key{F3} with @key{META} held down is
1106 @code{M-f3}.  When you use more than one prefix, we recommend you
1107 write them in alphabetical order; but the order does not matter in
1108 arguments to the key-binding lookup and modification functions.
1110 @node Mouse Events
1111 @subsection Mouse Events
1113 Emacs supports four kinds of mouse events: click events, drag events,
1114 button-down events, and motion events.  All mouse events are represented
1115 as lists.  The @sc{car} of the list is the event type; this says which
1116 mouse button was involved, and which modifier keys were used with it.
1117 The event type can also distinguish double or triple button presses
1118 (@pxref{Repeat Events}).  The rest of the list elements give position
1119 and time information.
1121 For key lookup, only the event type matters: two events of the same type
1122 necessarily run the same command.  The command can access the full
1123 values of these events using the @samp{e} interactive code.
1124 @xref{Interactive Codes}.
1126 A key sequence that starts with a mouse event is read using the keymaps
1127 of the buffer in the window that the mouse was in, not the current
1128 buffer.  This does not imply that clicking in a window selects that
1129 window or its buffer---that is entirely under the control of the command
1130 binding of the key sequence.
1132 @node Click Events
1133 @subsection Click Events
1134 @cindex click event
1135 @cindex mouse click event
1137 When the user presses a mouse button and releases it at the same
1138 location, that generates a @dfn{click} event.  All mouse click event
1139 share the same format:
1141 @example
1142 (@var{event-type} @var{position} @var{click-count})
1143 @end example
1145 @table @asis
1146 @item @var{event-type}
1147 This is a symbol that indicates which mouse button was used.  It is
1148 one of the symbols @code{mouse-1}, @code{mouse-2}, @dots{}, where the
1149 buttons are numbered left to right.
1151 You can also use prefixes @samp{A-}, @samp{C-}, @samp{H-}, @samp{M-},
1152 @samp{S-} and @samp{s-} for modifiers alt, control, hyper, meta, shift
1153 and super, just as you would with function keys.
1155 This symbol also serves as the event type of the event.  Key bindings
1156 describe events by their types; thus, if there is a key binding for
1157 @code{mouse-1}, that binding would apply to all events whose
1158 @var{event-type} is @code{mouse-1}.
1160 @item @var{position}
1161 This is the position where the mouse click occurred.  The actual
1162 format of @var{position} depends on what part of a window was clicked
1163 on.  The various formats are described below.
1165 @item @var{click-count}
1166 This is the number of rapid repeated presses so far of the same mouse
1167 button.  @xref{Repeat Events}.
1168 @end table
1170 For mouse click events in the text area, mode line, header line, or in
1171 the marginal areas, @var{position} has this form:
1173 @example
1174 (@var{window} @var{pos-or-area} (@var{x} . @var{y}) @var{timestamp}
1175  @var{object} @var{text-pos} (@var{col} . @var{row})
1176  @var{image} (@var{dx} . @var{dy}) (@var{width} . @var{height}))
1177 @end example
1179 @table @asis
1180 @item @var{window}
1181 This is the window in which the click occurred.
1183 @item @var{pos-or-area}
1184 This is the buffer position of the character clicked on in the text
1185 area, or if clicked outside the text area, it is the window area in
1186 which the click occurred.  It is one of the symbols @code{mode-line},
1187 @code{header-line}, @code{vertical-line}, @code{left-margin},
1188 @code{right-margin}, @code{left-fringe}, or @code{right-fringe}.
1190 @item @var{x}, @var{y}
1191 These are the pixel-denominated coordinates of the click, relative to
1192 the top left corner of @var{window}, which is @code{(0 . 0)}.
1193 For the mode or header line, @var{y} does not have meaningful data.
1194 For the vertical line, @var{x} does not have meaningful data.
1196 @item @var{timestamp}
1197 This is the time at which the event occurred, in milliseconds.
1199 @item @var{object}
1200 This is the object on which the click occurred.  It is either
1201 @code{nil} if there is no string property, or it has the form
1202 (@var{string} . @var{string-pos}) when there is a string-type text
1203 property at the click position.
1205 @item @var{string}
1206 This is the string on which the click occurred, including any
1207 properties.
1209 @item @var{string-pos}
1210 This is the position in the string on which the click occurred,
1211 relevant if properties at the click need to be looked up.
1213 @item @var{text-pos}
1214 For clicks on a marginal area or on a fringe, this is the buffer
1215 position of the first visible character in the corresponding line in
1216 the window.  For other events, it is the current buffer position in
1217 the window.
1219 @item @var{col}, @var{row}
1220 These are the actual coordinates of the glyph under the @var{x},
1221 @var{y} position, possibly padded with default character width
1222 glyphs if @var{x} is beyond the last glyph on the line.
1224 @item @var{image}
1225 This is the image object on which the click occurred.  It is either
1226 @code{nil} if there is no image at the position clicked on, or it is
1227 an image object as returned by @code{find-image} if click was in an image.
1229 @item @var{dx}, @var{dy}
1230 These are the pixel-denominated coordinates of the click, relative to
1231 the top left corner of @var{object}, which is @code{(0 . 0)}.  If
1232 @var{object} is @code{nil}, the coordinates are relative to the top
1233 left corner of the character glyph clicked on.
1234 @end table
1236 For mouse clicks on a scroll-bar, @var{position} has this form:
1238 @example
1239 (@var{window} @var{area} (@var{portion} . @var{whole}) @var{timestamp} @var{part})
1240 @end example
1242 @table @asis
1243 @item @var{window}
1244 This is the window whose scroll-bar was clicked on.
1246 @item @var{area}
1247 This is the scroll bar where the click occurred.  It is one of the
1248 symbols @code{vertical-scroll-bar} or @code{horizontal-scroll-bar}.
1250 @item @var{portion}
1251 This is the distance of the click from the top or left end of
1252 the scroll bar.
1254 @item @var{whole}
1255 This is the length of the entire scroll bar.
1257 @item @var{timestamp}
1258 This is the time at which the event occurred, in milliseconds.
1260 @item @var{part}
1261 This is the part of the scroll-bar which was clicked on.  It is one
1262 of the symbols @code{above-handle}, @code{handle}, @code{below-handle},
1263 @code{up}, @code{down}, @code{top}, @code{bottom}, and @code{end-scroll}.
1264 @end table
1266 In one special case, @var{buffer-pos} is a list containing a symbol (one
1267 of the symbols listed above) instead of just the symbol.  This happens
1268 after the imaginary prefix keys for the event are inserted into the
1269 input stream.  @xref{Key Sequence Input}.
1271 @node Drag Events
1272 @subsection Drag Events
1273 @cindex drag event
1274 @cindex mouse drag event
1276 With Emacs, you can have a drag event without even changing your
1277 clothes.  A @dfn{drag event} happens every time the user presses a mouse
1278 button and then moves the mouse to a different character position before
1279 releasing the button.  Like all mouse events, drag events are
1280 represented in Lisp as lists.  The lists record both the starting mouse
1281 position and the final position, like this:
1283 @example
1284 (@var{event-type}
1285  (@var{window1} @var{buffer-pos1} (@var{x1} . @var{y1}) @var{timestamp1})
1286  (@var{window2} @var{buffer-pos2} (@var{x2} . @var{y2}) @var{timestamp2})
1287  @var{click-count})
1288 @end example
1290 For a drag event, the name of the symbol @var{event-type} contains the
1291 prefix @samp{drag-}.  For example, dragging the mouse with button 2 held
1292 down generates a @code{drag-mouse-2} event.  The second and third
1293 elements of the event give the starting and ending position of the drag.
1294 Aside from that, the data have the same meanings as in a click event
1295 (@pxref{Click Events}).  You can access the second element of any mouse
1296 event in the same way, with no need to distinguish drag events from
1297 others.
1299 The @samp{drag-} prefix follows the modifier key prefixes such as
1300 @samp{C-} and @samp{M-}.
1302 If @code{read-key-sequence} receives a drag event that has no key
1303 binding, and the corresponding click event does have a binding, it
1304 changes the drag event into a click event at the drag's starting
1305 position.  This means that you don't have to distinguish between click
1306 and drag events unless you want to.
1308 @node Button-Down Events
1309 @subsection Button-Down Events
1310 @cindex button-down event
1312 Click and drag events happen when the user releases a mouse button.
1313 They cannot happen earlier, because there is no way to distinguish a
1314 click from a drag until the button is released.
1316 If you want to take action as soon as a button is pressed, you need to
1317 handle @dfn{button-down} events.@footnote{Button-down is the
1318 conservative antithesis of drag.}  These occur as soon as a button is
1319 pressed.  They are represented by lists that look exactly like click
1320 events (@pxref{Click Events}), except that the @var{event-type} symbol
1321 name contains the prefix @samp{down-}.  The @samp{down-} prefix follows
1322 modifier key prefixes such as @samp{C-} and @samp{M-}.
1324 The function @code{read-key-sequence} ignores any button-down events
1325 that don't have command bindings; therefore, the Emacs command loop
1326 ignores them too.  This means that you need not worry about defining
1327 button-down events unless you want them to do something.  The usual
1328 reason to define a button-down event is so that you can track mouse
1329 motion (by reading motion events) until the button is released.
1330 @xref{Motion Events}.
1332 @node Repeat Events
1333 @subsection Repeat Events
1334 @cindex repeat events
1335 @cindex double-click events
1336 @cindex triple-click events
1337 @cindex mouse events, repeated
1339 If you press the same mouse button more than once in quick succession
1340 without moving the mouse, Emacs generates special @dfn{repeat} mouse
1341 events for the second and subsequent presses.
1343 The most common repeat events are @dfn{double-click} events.  Emacs
1344 generates a double-click event when you click a button twice; the event
1345 happens when you release the button (as is normal for all click
1346 events).
1348 The event type of a double-click event contains the prefix
1349 @samp{double-}.  Thus, a double click on the second mouse button with
1350 @key{meta} held down comes to the Lisp program as
1351 @code{M-double-mouse-2}.  If a double-click event has no binding, the
1352 binding of the corresponding ordinary click event is used to execute
1353 it.  Thus, you need not pay attention to the double click feature
1354 unless you really want to.
1356 When the user performs a double click, Emacs generates first an ordinary
1357 click event, and then a double-click event.  Therefore, you must design
1358 the command binding of the double click event to assume that the
1359 single-click command has already run.  It must produce the desired
1360 results of a double click, starting from the results of a single click.
1362 This is convenient, if the meaning of a double click somehow ``builds
1363 on'' the meaning of a single click---which is recommended user interface
1364 design practice for double clicks.
1366 If you click a button, then press it down again and start moving the
1367 mouse with the button held down, then you get a @dfn{double-drag} event
1368 when you ultimately release the button.  Its event type contains
1369 @samp{double-drag} instead of just @samp{drag}.  If a double-drag event
1370 has no binding, Emacs looks for an alternate binding as if the event
1371 were an ordinary drag.
1373 Before the double-click or double-drag event, Emacs generates a
1374 @dfn{double-down} event when the user presses the button down for the
1375 second time.  Its event type contains @samp{double-down} instead of just
1376 @samp{down}.  If a double-down event has no binding, Emacs looks for an
1377 alternate binding as if the event were an ordinary button-down event.
1378 If it finds no binding that way either, the double-down event is
1379 ignored.
1381 To summarize, when you click a button and then press it again right
1382 away, Emacs generates a down event and a click event for the first
1383 click, a double-down event when you press the button again, and finally
1384 either a double-click or a double-drag event.
1386 If you click a button twice and then press it again, all in quick
1387 succession, Emacs generates a @dfn{triple-down} event, followed by
1388 either a @dfn{triple-click} or a @dfn{triple-drag}.  The event types of
1389 these events contain @samp{triple} instead of @samp{double}.  If any
1390 triple event has no binding, Emacs uses the binding that it would use
1391 for the corresponding double event.
1393 If you click a button three or more times and then press it again, the
1394 events for the presses beyond the third are all triple events.  Emacs
1395 does not have separate event types for quadruple, quintuple, etc.@:
1396 events.  However, you can look at the event list to find out precisely
1397 how many times the button was pressed.
1399 @defun event-click-count event
1400 This function returns the number of consecutive button presses that led
1401 up to @var{event}.  If @var{event} is a double-down, double-click or
1402 double-drag event, the value is 2.  If @var{event} is a triple event,
1403 the value is 3 or greater.  If @var{event} is an ordinary mouse event
1404 (not a repeat event), the value is 1.
1405 @end defun
1407 @defopt double-click-fuzz
1408 To generate repeat events, successive mouse button presses must be at
1409 approximately the same screen position.  The value of
1410 @code{double-click-fuzz} specifies the maximum number of pixels the
1411 mouse may be moved (horizontally or vertically) between two successive
1412 clicks to make a double-click.
1414 This variable is also the threshold for motion of the mouse to count
1415 as a drag.
1416 @end defopt
1418 @defopt double-click-time
1419 To generate repeat events, the number of milliseconds between
1420 successive button presses must be less than the value of
1421 @code{double-click-time}.  Setting @code{double-click-time} to
1422 @code{nil} disables multi-click detection entirely.  Setting it to
1423 @code{t} removes the time limit; Emacs then detects multi-clicks by
1424 position only.
1425 @end defopt
1427 @node Motion Events
1428 @subsection Motion Events
1429 @cindex motion event
1430 @cindex mouse motion events
1432 Emacs sometimes generates @dfn{mouse motion} events to describe motion
1433 of the mouse without any button activity.  Mouse motion events are
1434 represented by lists that look like this:
1436 @example
1437 (mouse-movement (@var{window} @var{buffer-pos} (@var{x} . @var{y}) @var{timestamp}))
1438 @end example
1440 The second element of the list describes the current position of the
1441 mouse, just as in a click event (@pxref{Click Events}).
1443 The special form @code{track-mouse} enables generation of motion events
1444 within its body.  Outside of @code{track-mouse} forms, Emacs does not
1445 generate events for mere motion of the mouse, and these events do not
1446 appear.  @xref{Mouse Tracking}.
1448 @node Focus Events
1449 @subsection Focus Events
1450 @cindex focus event
1452 Window systems provide general ways for the user to control which window
1453 gets keyboard input.  This choice of window is called the @dfn{focus}.
1454 When the user does something to switch between Emacs frames, that
1455 generates a @dfn{focus event}.  The normal definition of a focus event,
1456 in the global keymap, is to select a new frame within Emacs, as the user
1457 would expect.  @xref{Input Focus}.
1459 Focus events are represented in Lisp as lists that look like this:
1461 @example
1462 (switch-frame @var{new-frame})
1463 @end example
1465 @noindent
1466 where @var{new-frame} is the frame switched to.
1468 Most X window managers are set up so that just moving the mouse into a
1469 window is enough to set the focus there.  Emacs appears to do this,
1470 because it changes the cursor to solid in the new frame.  However, there
1471 is no need for the Lisp program to know about the focus change until
1472 some other kind of input arrives.  So Emacs generates a focus event only
1473 when the user actually types a keyboard key or presses a mouse button in
1474 the new frame; just moving the mouse between frames does not generate a
1475 focus event.
1477 A focus event in the middle of a key sequence would garble the
1478 sequence.  So Emacs never generates a focus event in the middle of a key
1479 sequence.  If the user changes focus in the middle of a key
1480 sequence---that is, after a prefix key---then Emacs reorders the events
1481 so that the focus event comes either before or after the multi-event key
1482 sequence, and not within it.
1484 @node Misc Events
1485 @subsection Miscellaneous System Events
1487 A few other event types represent occurrences within the system.
1489 @table @code
1490 @cindex @code{delete-frame} event
1491 @item (delete-frame (@var{frame}))
1492 This kind of event indicates that the user gave the window manager
1493 a command to delete a particular window, which happens to be an Emacs frame.
1495 The standard definition of the @code{delete-frame} event is to delete @var{frame}.
1497 @cindex @code{iconify-frame} event
1498 @item (iconify-frame (@var{frame}))
1499 This kind of event indicates that the user iconified @var{frame} using
1500 the window manager.  Its standard definition is @code{ignore}; since the
1501 frame has already been iconified, Emacs has no work to do.  The purpose
1502 of this event type is so that you can keep track of such events if you
1503 want to.
1505 @cindex @code{make-frame-visible} event
1506 @item (make-frame-visible (@var{frame}))
1507 This kind of event indicates that the user deiconified @var{frame} using
1508 the window manager.  Its standard definition is @code{ignore}; since the
1509 frame has already been made visible, Emacs has no work to do.
1511 @cindex @code{wheel-up} event
1512 @cindex @code{wheel-down} event
1513 @item (wheel-up @var{position})
1514 @item (wheel-down @var{position})
1515 These kinds of event are generated by moving a mouse wheel.  Their
1516 usual meaning is a kind of scroll or zoom.
1518 The element @var{position} is a list describing the position of the
1519 event, in the same format as used in a mouse-click event.
1521 This kind of event is generated only on some kinds of systems. On some
1522 systems, @code{mouse-4} and @code{mouse-5} are used instead.  For
1523 portable code, use the variables @code{mouse-wheel-up-event} and
1524 @code{mouse-wheel-down-event} defined in @file{mwheel.el} to determine
1525 what event types to expect for the mouse wheel.
1527 @cindex @code{drag-n-drop} event
1528 @item (drag-n-drop @var{position} @var{files})
1529 This kind of event is generated when a group of files is
1530 selected in an application outside of Emacs, and then dragged and
1531 dropped onto an Emacs frame.
1533 The element @var{position} is a list describing the position of the
1534 event, in the same format as used in a mouse-click event, and
1535 @var{files} is the list of file names that were dragged and dropped.
1536 The usual way to handle this event is by visiting these files.
1538 This kind of event is generated, at present, only on some kinds of
1539 systems.
1541 @cindex @code{usr1-signal} event
1542 @cindex @code{usr2-signal} event
1543 @item usr1-signal
1544 @itemx usr2-signal
1545 These events are generated when the Emacs process receives the signals
1546 @code{SIGUSR1} and @code{SIGUSR2}.  They contain no additional data
1547 because signals do not carry additional information.
1548 @end table
1550   If one of these events arrives in the middle of a key sequence---that
1551 is, after a prefix key---then Emacs reorders the events so that this
1552 event comes either before or after the multi-event key sequence, not
1553 within it.
1555 @node Event Examples
1556 @subsection Event Examples
1558 If the user presses and releases the left mouse button over the same
1559 location, that generates a sequence of events like this:
1561 @smallexample
1562 (down-mouse-1 (#<window 18 on NEWS> 2613 (0 . 38) -864320))
1563 (mouse-1      (#<window 18 on NEWS> 2613 (0 . 38) -864180))
1564 @end smallexample
1566 While holding the control key down, the user might hold down the
1567 second mouse button, and drag the mouse from one line to the next.
1568 That produces two events, as shown here:
1570 @smallexample
1571 (C-down-mouse-2 (#<window 18 on NEWS> 3440 (0 . 27) -731219))
1572 (C-drag-mouse-2 (#<window 18 on NEWS> 3440 (0 . 27) -731219)
1573                 (#<window 18 on NEWS> 3510 (0 . 28) -729648))
1574 @end smallexample
1576 While holding down the meta and shift keys, the user might press the
1577 second mouse button on the window's mode line, and then drag the mouse
1578 into another window.  That produces a pair of events like these:
1580 @smallexample
1581 (M-S-down-mouse-2 (#<window 18 on NEWS> mode-line (33 . 31) -457844))
1582 (M-S-drag-mouse-2 (#<window 18 on NEWS> mode-line (33 . 31) -457844)
1583                   (#<window 20 on carlton-sanskrit.tex> 161 (33 . 3)
1584                    -453816))
1585 @end smallexample
1587 @node Classifying Events
1588 @subsection Classifying Events
1589 @cindex event type
1591   Every event has an @dfn{event type}, which classifies the event for
1592 key binding purposes.  For a keyboard event, the event type equals the
1593 event value; thus, the event type for a character is the character, and
1594 the event type for a function key symbol is the symbol itself.  For
1595 events that are lists, the event type is the symbol in the @sc{car} of
1596 the list.  Thus, the event type is always a symbol or a character.
1598   Two events of the same type are equivalent where key bindings are
1599 concerned; thus, they always run the same command.  That does not
1600 necessarily mean they do the same things, however, as some commands look
1601 at the whole event to decide what to do.  For example, some commands use
1602 the location of a mouse event to decide where in the buffer to act.
1604   Sometimes broader classifications of events are useful.  For example,
1605 you might want to ask whether an event involved the @key{META} key,
1606 regardless of which other key or mouse button was used.
1608   The functions @code{event-modifiers} and @code{event-basic-type} are
1609 provided to get such information conveniently.
1611 @defun event-modifiers event
1612 This function returns a list of the modifiers that @var{event} has.  The
1613 modifiers are symbols; they include @code{shift}, @code{control},
1614 @code{meta}, @code{alt}, @code{hyper} and @code{super}.  In addition,
1615 the modifiers list of a mouse event symbol always contains one of
1616 @code{click}, @code{drag}, and @code{down}.  For double or triple
1617 events, it also contains @code{double} or @code{triple}.
1619 The argument @var{event} may be an entire event object, or just an
1620 event type.  If @var{event} is a symbol that has never been used in an
1621 event that has been read as input in the current Emacs session, then
1622 @code{event-modifiers} can return @code{nil}, even when @var{event}
1623 actually has modifiers.
1625 Here are some examples:
1627 @example
1628 (event-modifiers ?a)
1629      @result{} nil
1630 (event-modifiers ?A)
1631      @result{} (shift)
1632 (event-modifiers ?\C-a)
1633      @result{} (control)
1634 (event-modifiers ?\C-%)
1635      @result{} (control)
1636 (event-modifiers ?\C-\S-a)
1637      @result{} (control shift)
1638 (event-modifiers 'f5)
1639      @result{} nil
1640 (event-modifiers 's-f5)
1641      @result{} (super)
1642 (event-modifiers 'M-S-f5)
1643      @result{} (meta shift)
1644 (event-modifiers 'mouse-1)
1645      @result{} (click)
1646 (event-modifiers 'down-mouse-1)
1647      @result{} (down)
1648 @end example
1650 The modifiers list for a click event explicitly contains @code{click},
1651 but the event symbol name itself does not contain @samp{click}.
1652 @end defun
1654 @defun event-basic-type event
1655 This function returns the key or mouse button that @var{event}
1656 describes, with all modifiers removed.  The @var{event} argument is as
1657 in @code{event-modifiers}.  For example:
1659 @example
1660 (event-basic-type ?a)
1661      @result{} 97
1662 (event-basic-type ?A)
1663      @result{} 97
1664 (event-basic-type ?\C-a)
1665      @result{} 97
1666 (event-basic-type ?\C-\S-a)
1667      @result{} 97
1668 (event-basic-type 'f5)
1669      @result{} f5
1670 (event-basic-type 's-f5)
1671      @result{} f5
1672 (event-basic-type 'M-S-f5)
1673      @result{} f5
1674 (event-basic-type 'down-mouse-1)
1675      @result{} mouse-1
1676 @end example
1677 @end defun
1679 @defun mouse-movement-p object
1680 This function returns non-@code{nil} if @var{object} is a mouse movement
1681 event.
1682 @end defun
1684 @defun event-convert-list list
1685 This function converts a list of modifier names and a basic event type
1686 to an event type which specifies all of them.  The basic event type
1687 must be the last element of the list.  For example,
1689 @example
1690 (event-convert-list '(control ?a))
1691      @result{} 1
1692 (event-convert-list '(control meta ?a))
1693      @result{} -134217727
1694 (event-convert-list '(control super f1))
1695      @result{} C-s-f1
1696 @end example
1697 @end defun
1699 @node Accessing Events
1700 @subsection Accessing Events
1701 @cindex mouse events, accessing the data
1702 @cindex accessing data of mouse events
1704   This section describes convenient functions for accessing the data in
1705 a mouse button or motion event.
1707   These two functions return the starting or ending position of a
1708 mouse-button event, as a list of this form:
1710 @example
1711 (@var{window} @var{pos-or-area} (@var{x} . @var{y}) @var{timestamp}
1712  @var{object} @var{text-pos} (@var{col} . @var{row})
1713  @var{image} (@var{dx} . @var{dy}) (@var{width} . @var{height}))
1714 @end example
1716 @defun event-start event
1717 This returns the starting position of @var{event}.
1719 If @var{event} is a click or button-down event, this returns the
1720 location of the event.  If @var{event} is a drag event, this returns the
1721 drag's starting position.
1722 @end defun
1724 @defun event-end event
1725 This returns the ending position of @var{event}.
1727 If @var{event} is a drag event, this returns the position where the user
1728 released the mouse button.  If @var{event} is a click or button-down
1729 event, the value is actually the starting position, which is the only
1730 position such events have.
1731 @end defun
1733 @cindex mouse position list, accessing
1734   These functions take a position list as described above, and
1735 return various parts of it.
1737 @defun posn-window position
1738 Return the window that @var{position} is in.
1739 @end defun
1741 @defun posn-area position
1742 Return the window area recorded in @var{position}.  It returns @code{nil}
1743 when the event occurred in the text area of the window; otherwise, it
1744 is a symbol identifying the area in which the the event occurred.
1745 @end defun
1747 @defun posn-point position
1748 Return the buffer position in @var{position}.  When the event occurred
1749 in the text area of the window, in a marginal area, or on a fringe,
1750 this is an integer specifying a buffer position.  Otherwise, the value
1751 is undefined.
1752 @end defun
1754 @defun posn-x-y position
1755 Return the pixel-based x and y coordinates in @var{position}, as a
1756 cons cell @code{(@var{x} . @var{y})}.  These coordinates are relative
1757 to the window given by @code{posn-window}.
1759 This example shows how to convert these window-relative coordinates
1760 into frame-relative coordinates:
1762 @example
1763 (defun frame-relative-coordinates (position)
1764   "Return frame-relative coordinates from POSITION."
1765   (let* ((x-y (posn-x-y position))
1766          (window (posn-window position))
1767          (edges (window-inside-pixel-edges window)))
1768     (cons (+ (car x-y) (car edges))
1769           (+ (cdr x-y) (cadr edges)))))
1770 @end example
1771 @end defun
1773 @defun posn-col-row position
1774 Return the row and column (in units of the frame's default character
1775 height and width) of @var{position}, as a cons cell @code{(@var{col} .
1776 @var{row})}.  These are computed from the @var{x} and @var{y} values
1777 actually found in @var{position}.
1778 @end defun
1780 @defun posn-actual-col-row position
1781 Return the actual row and column in @var{position}, as a cons cell
1782 @code{(@var{col} . @var{row})}.  The values are the actual row number
1783 in the window, and the actual character number in that row.  It returns
1784 @code{nil} if @var{position} does not include actual positions values.
1785 You can use @code{posn-col-row} to get approximate values.
1786 @end defun
1788 @defun posn-string position
1789 Return the string object in @var{position}, either @code{nil}, or a
1790 cons cell @code{(@var{string} . @var{string-pos})}.
1791 @end defun
1793 @defun posn-image position
1794 Return the image object in @var{position}, either @code{nil}, or an
1795 image @code{(image ...)}.
1796 @end defun
1798 @defun posn-object position
1799 Return the image or string object in @var{position}, either
1800 @code{nil}, an image @code{(image ...)}, or a cons cell
1801 @code{(@var{string} . @var{string-pos})}.
1802 @end defun
1804 @defun posn-object-x-y position
1805 Return the pixel-based x and y coordinates relative to the upper left
1806 corner of the object in @var{position} as a cons cell @code{(@var{dx}
1807 . @var{dy})}.  If the @var{position} is a buffer position, return the
1808 relative position in the character at that position.
1809 @end defun
1811 @defun posn-object-width-height position
1812 Return the pixel width and height of the object in @var{position} as a
1813 cons cell @code{(@var{width} . @var{height})}.  If the @var{position}
1814 is a buffer position, return the size of the character at that position.
1815 @end defun
1817 @cindex mouse event, timestamp
1818 @cindex timestamp of a mouse event
1819 @defun posn-timestamp position
1820 Return the timestamp in @var{position}.  This is the time at which the
1821 event occurred, in milliseconds.
1822 @end defun
1824   These functions compute a position list given particular buffer
1825 position or screen position.  You can access the data in this position
1826 list with the functions described above.
1828 @defun posn-at-point &optional pos window
1829 This function returns a position list for position @var{pos} in
1830 @var{window}.  @var{pos} defaults to point in @var{window};
1831 @var{window} defaults to the selected window.
1833 @code{posn-at-point} returns @code{nil} if @var{pos} is not visible in
1834 @var{window}.
1835 @end defun
1837 @defun posn-at-x-y x y &optional frame-or-window
1838 This function returns position information corresponding to pixel
1839 coordinates @var{x} and @var{y} in a specified frame or window,
1840 @var{frame-or-window}, which defaults to the selected window.
1841 The coordinates @var{x} and @var{y} are relative to the
1842 frame or window used.
1843 @end defun
1845   These functions are useful for decoding scroll bar events.
1847 @defun scroll-bar-event-ratio event
1848 This function returns the fractional vertical position of a scroll bar
1849 event within the scroll bar.  The value is a cons cell
1850 @code{(@var{portion} . @var{whole})} containing two integers whose ratio
1851 is the fractional position.
1852 @end defun
1854 @defun scroll-bar-scale ratio total
1855 This function multiplies (in effect) @var{ratio} by @var{total},
1856 rounding the result to an integer.  The argument @var{ratio} is not a
1857 number, but rather a pair @code{(@var{num} . @var{denom})}---typically a
1858 value returned by @code{scroll-bar-event-ratio}.
1860 This function is handy for scaling a position on a scroll bar into a
1861 buffer position.  Here's how to do that:
1863 @example
1864 (+ (point-min)
1865    (scroll-bar-scale
1866       (posn-x-y (event-start event))
1867       (- (point-max) (point-min))))
1868 @end example
1870 Recall that scroll bar events have two integers forming a ratio, in place
1871 of a pair of x and y coordinates.
1872 @end defun
1874 @node Strings of Events
1875 @subsection Putting Keyboard Events in Strings
1876 @cindex keyboard events in strings
1877 @cindex strings with keyboard events
1879   In most of the places where strings are used, we conceptualize the
1880 string as containing text characters---the same kind of characters found
1881 in buffers or files.  Occasionally Lisp programs use strings that
1882 conceptually contain keyboard characters; for example, they may be key
1883 sequences or keyboard macro definitions.  However, storing keyboard
1884 characters in a string is a complex matter, for reasons of historical
1885 compatibility, and it is not always possible.
1887   We recommend that new programs avoid dealing with these complexities
1888 by not storing keyboard events in strings.  Here is how to do that:
1890 @itemize @bullet
1891 @item
1892 Use vectors instead of strings for key sequences, when you plan to use
1893 them for anything other than as arguments to @code{lookup-key} and
1894 @code{define-key}.  For example, you can use
1895 @code{read-key-sequence-vector} instead of @code{read-key-sequence}, and
1896 @code{this-command-keys-vector} instead of @code{this-command-keys}.
1898 @item
1899 Use vectors to write key sequence constants containing meta characters,
1900 even when passing them directly to @code{define-key}.
1902 @item
1903 When you have to look at the contents of a key sequence that might be a
1904 string, use @code{listify-key-sequence} (@pxref{Event Input Misc})
1905 first, to convert it to a list.
1906 @end itemize
1908   The complexities stem from the modifier bits that keyboard input
1909 characters can include.  Aside from the Meta modifier, none of these
1910 modifier bits can be included in a string, and the Meta modifier is
1911 allowed only in special cases.
1913   The earliest GNU Emacs versions represented meta characters as codes
1914 in the range of 128 to 255.  At that time, the basic character codes
1915 ranged from 0 to 127, so all keyboard character codes did fit in a
1916 string.  Many Lisp programs used @samp{\M-} in string constants to stand
1917 for meta characters, especially in arguments to @code{define-key} and
1918 similar functions, and key sequences and sequences of events were always
1919 represented as strings.
1921   When we added support for larger basic character codes beyond 127, and
1922 additional modifier bits, we had to change the representation of meta
1923 characters.  Now the flag that represents the Meta modifier in a
1924 character is
1925 @tex
1926 @math{2^{27}}
1927 @end tex
1928 @ifnottex
1929 2**27
1930 @end ifnottex
1931 and such numbers cannot be included in a string.
1933   To support programs with @samp{\M-} in string constants, there are
1934 special rules for including certain meta characters in a string.
1935 Here are the rules for interpreting a string as a sequence of input
1936 characters:
1938 @itemize @bullet
1939 @item
1940 If the keyboard character value is in the range of 0 to 127, it can go
1941 in the string unchanged.
1943 @item
1944 The meta variants of those characters, with codes in the range of
1945 @tex
1946 @math{2^{27}}
1947 @end tex
1948 @ifnottex
1949 2**27
1950 @end ifnottex
1952 @tex
1953 @math{2^{27} + 127},
1954 @end tex
1955 @ifnottex
1956 2**27+127,
1957 @end ifnottex
1958 can also go in the string, but you must change their
1959 numeric values.  You must set the
1960 @tex
1961 @math{2^{7}}
1962 @end tex
1963 @ifnottex
1964 2**7
1965 @end ifnottex
1966 bit instead of the
1967 @tex
1968 @math{2^{27}}
1969 @end tex
1970 @ifnottex
1971 2**27
1972 @end ifnottex
1973 bit, resulting in a value between 128 and 255.  Only a unibyte string
1974 can include these codes.
1976 @item
1977 Non-@acronym{ASCII} characters above 256 can be included in a multibyte string.
1979 @item
1980 Other keyboard character events cannot fit in a string.  This includes
1981 keyboard events in the range of 128 to 255.
1982 @end itemize
1984   Functions such as @code{read-key-sequence} that construct strings of
1985 keyboard input characters follow these rules: they construct vectors
1986 instead of strings, when the events won't fit in a string.
1988   When you use the read syntax @samp{\M-} in a string, it produces a
1989 code in the range of 128 to 255---the same code that you get if you
1990 modify the corresponding keyboard event to put it in the string.  Thus,
1991 meta events in strings work consistently regardless of how they get into
1992 the strings.
1994   However, most programs would do well to avoid these issues by
1995 following the recommendations at the beginning of this section.
1997 @node Reading Input
1998 @section Reading Input
2000   The editor command loop reads key sequences using the function
2001 @code{read-key-sequence}, which uses @code{read-event}.  These and other
2002 functions for event input are also available for use in Lisp programs.
2003 See also @code{momentary-string-display} in @ref{Temporary Displays},
2004 and @code{sit-for} in @ref{Waiting}.  @xref{Terminal Input}, for
2005 functions and variables for controlling terminal input modes and
2006 debugging terminal input.  @xref{Translating Input}, for features you
2007 can use for translating or modifying input events while reading them.
2009   For higher-level input facilities, see @ref{Minibuffers}.
2011 @menu
2012 * Key Sequence Input::          How to read one key sequence.
2013 * Reading One Event::           How to read just one event.
2014 * Invoking the Input Method::   How reading an event uses the input method.
2015 * Quoted Character Input::      Asking the user to specify a character.
2016 * Event Input Misc::            How to reread or throw away input events.
2017 @end menu
2019 @node Key Sequence Input
2020 @subsection Key Sequence Input
2021 @cindex key sequence input
2023   The command loop reads input a key sequence at a time, by calling
2024 @code{read-key-sequence}.  Lisp programs can also call this function;
2025 for example, @code{describe-key} uses it to read the key to describe.
2027 @defun read-key-sequence prompt
2028 @cindex key sequence
2029 This function reads a key sequence and returns it as a string or
2030 vector.  It keeps reading events until it has accumulated a complete key
2031 sequence; that is, enough to specify a non-prefix command using the
2032 currently active keymaps.  (Remember that a key sequence that starts
2033 with a mouse event is read using the keymaps of the buffer in the
2034 window that the mouse was in, not the current buffer.)
2036 If the events are all characters and all can fit in a string, then
2037 @code{read-key-sequence} returns a string (@pxref{Strings of Events}).
2038 Otherwise, it returns a vector, since a vector can hold all kinds of
2039 events---characters, symbols, and lists.  The elements of the string or
2040 vector are the events in the key sequence.
2042 The argument @var{prompt} is either a string to be displayed in the echo
2043 area as a prompt, or @code{nil}, meaning not to display a prompt.
2045 In the example below, the prompt @samp{?} is displayed in the echo area,
2046 and the user types @kbd{C-x C-f}.
2048 @example
2049 (read-key-sequence "?")
2051 @group
2052 ---------- Echo Area ----------
2053 ?@kbd{C-x C-f}
2054 ---------- Echo Area ----------
2056      @result{} "^X^F"
2057 @end group
2058 @end example
2060 The function @code{read-key-sequence} suppresses quitting: @kbd{C-g}
2061 typed while reading with this function works like any other character,
2062 and does not set @code{quit-flag}.  @xref{Quitting}.
2063 @end defun
2065 @defun read-key-sequence-vector prompt
2066 This is like @code{read-key-sequence} except that it always
2067 returns the key sequence as a vector, never as a string.
2068 @xref{Strings of Events}.
2069 @end defun
2071 @cindex upper case key sequence
2072 @cindex downcasing in @code{lookup-key}
2073 If an input character is upper-case (or has the shift modifier) and
2074 has no key binding, but its lower-case equivalent has one, then
2075 @code{read-key-sequence} converts the character to lower case.  Note
2076 that @code{lookup-key} does not perform case conversion in this way.
2078 The function @code{read-key-sequence} also transforms some mouse events.
2079 It converts unbound drag events into click events, and discards unbound
2080 button-down events entirely.  It also reshuffles focus events and
2081 miscellaneous window events so that they never appear in a key sequence
2082 with any other events.
2084 @cindex @code{header-line} prefix key
2085 @cindex @code{mode-line} prefix key
2086 @cindex @code{vertical-line} prefix key
2087 @cindex @code{horizontal-scroll-bar} prefix key
2088 @cindex @code{vertical-scroll-bar} prefix key
2089 @cindex @code{menu-bar} prefix key
2090 @cindex mouse events, in special parts of frame
2091 When mouse events occur in special parts of a window, such as a mode
2092 line or a scroll bar, the event type shows nothing special---it is the
2093 same symbol that would normally represent that combination of mouse
2094 button and modifier keys.  The information about the window part is kept
2095 elsewhere in the event---in the coordinates.  But
2096 @code{read-key-sequence} translates this information into imaginary
2097 ``prefix keys'', all of which are symbols: @code{header-line},
2098 @code{horizontal-scroll-bar}, @code{menu-bar}, @code{mode-line},
2099 @code{vertical-line}, and @code{vertical-scroll-bar}.  You can define
2100 meanings for mouse clicks in special window parts by defining key
2101 sequences using these imaginary prefix keys.
2103 For example, if you call @code{read-key-sequence} and then click the
2104 mouse on the window's mode line, you get two events, like this:
2106 @example
2107 (read-key-sequence "Click on the mode line: ")
2108      @result{} [mode-line
2109          (mouse-1
2110           (#<window 6 on NEWS> mode-line
2111            (40 . 63) 5959987))]
2112 @end example
2114 @defvar num-input-keys
2115 @c Emacs 19 feature
2116 This variable's value is the number of key sequences processed so far in
2117 this Emacs session.  This includes key sequences read from the terminal
2118 and key sequences read from keyboard macros being executed.
2119 @end defvar
2121 @defvar num-nonmacro-input-events
2122 This variable holds the total number of input events received so far
2123 from the terminal---not counting those generated by keyboard macros.
2124 @end defvar
2126 @node Reading One Event
2127 @subsection Reading One Event
2128 @cindex reading a single event
2129 @cindex event, reading only one
2131   The lowest level functions for command input are those that read a
2132 single event.
2134 None of the three functions below suppresses quitting.
2136 @defun read-event &optional prompt inherit-input-method
2137 This function reads and returns the next event of command input, waiting
2138 if necessary until an event is available.  Events can come directly from
2139 the user or from a keyboard macro.
2141 If the optional argument @var{prompt} is non-@code{nil}, it should be a
2142 string to display in the echo area as a prompt.  Otherwise,
2143 @code{read-event} does not display any message to indicate it is waiting
2144 for input; instead, it prompts by echoing: it displays descriptions of
2145 the events that led to or were read by the current command.  @xref{The
2146 Echo Area}.
2148 If @var{inherit-input-method} is non-@code{nil}, then the current input
2149 method (if any) is employed to make it possible to enter a
2150 non-@acronym{ASCII} character.  Otherwise, input method handling is disabled
2151 for reading this event.
2153 If @code{cursor-in-echo-area} is non-@code{nil}, then @code{read-event}
2154 moves the cursor temporarily to the echo area, to the end of any message
2155 displayed there.  Otherwise @code{read-event} does not move the cursor.
2157 If @code{read-event} gets an event that is defined as a help character,
2158 then in some cases @code{read-event} processes the event directly without
2159 returning.  @xref{Help Functions}.  Certain other events, called
2160 @dfn{special events}, are also processed directly within
2161 @code{read-event} (@pxref{Special Events}).
2163 Here is what happens if you call @code{read-event} and then press the
2164 right-arrow function key:
2166 @example
2167 @group
2168 (read-event)
2169      @result{} right
2170 @end group
2171 @end example
2172 @end defun
2174 @defun read-char &optional prompt inherit-input-method
2175 This function reads and returns a character of command input.  If the
2176 user generates an event which is not a character (i.e. a mouse click or
2177 function key event), @code{read-char} signals an error.  The arguments
2178 work as in @code{read-event}.
2180 In the first example, the user types the character @kbd{1} (@acronym{ASCII}
2181 code 49).  The second example shows a keyboard macro definition that
2182 calls @code{read-char} from the minibuffer using @code{eval-expression}.
2183 @code{read-char} reads the keyboard macro's very next character, which
2184 is @kbd{1}.  Then @code{eval-expression} displays its return value in
2185 the echo area.
2187 @example
2188 @group
2189 (read-char)
2190      @result{} 49
2191 @end group
2193 @group
2194 ;; @r{We assume here you use @kbd{M-:} to evaluate this.}
2195 (symbol-function 'foo)
2196      @result{} "^[:(read-char)^M1"
2197 @end group
2198 @group
2199 (execute-kbd-macro 'foo)
2200      @print{} 49
2201      @result{} nil
2202 @end group
2203 @end example
2204 @end defun
2206 @defun read-char-exclusive &optional prompt inherit-input-method
2207 This function reads and returns a character of command input.  If the
2208 user generates an event which is not a character,
2209 @code{read-char-exclusive} ignores it and reads another event, until it
2210 gets a character.  The arguments work as in @code{read-event}.
2211 @end defun
2213 @node Invoking the Input Method
2214 @subsection Invoking the Input Method
2216   The event-reading functions invoke the current input method, if any
2217 (@pxref{Input Methods}).  If the value of @code{input-method-function}
2218 is non-@code{nil}, it should be a function; when @code{read-event} reads
2219 a printing character (including @key{SPC}) with no modifier bits, it
2220 calls that function, passing the character as an argument.
2222 @defvar input-method-function
2223 If this is non-@code{nil}, its value specifies the current input method
2224 function.
2226 @strong{Warning:} don't bind this variable with @code{let}.  It is often
2227 buffer-local, and if you bind it around reading input (which is exactly
2228 when you @emph{would} bind it), switching buffers asynchronously while
2229 Emacs is waiting will cause the value to be restored in the wrong
2230 buffer.
2231 @end defvar
2233   The input method function should return a list of events which should
2234 be used as input.  (If the list is @code{nil}, that means there is no
2235 input, so @code{read-event} waits for another event.)  These events are
2236 processed before the events in @code{unread-command-events}
2237 (@pxref{Event Input Misc}).  Events
2238 returned by the input method function are not passed to the input method
2239 function again, even if they are printing characters with no modifier
2240 bits.
2242   If the input method function calls @code{read-event} or
2243 @code{read-key-sequence}, it should bind @code{input-method-function} to
2244 @code{nil} first, to prevent recursion.
2246   The input method function is not called when reading the second and
2247 subsequent events of a key sequence.  Thus, these characters are not
2248 subject to input method processing.  The input method function should
2249 test the values of @code{overriding-local-map} and
2250 @code{overriding-terminal-local-map}; if either of these variables is
2251 non-@code{nil}, the input method should put its argument into a list and
2252 return that list with no further processing.
2254 @node Quoted Character Input
2255 @subsection Quoted Character Input
2256 @cindex quoted character input
2258   You can use the function @code{read-quoted-char} to ask the user to
2259 specify a character, and allow the user to specify a control or meta
2260 character conveniently, either literally or as an octal character code.
2261 The command @code{quoted-insert} uses this function.
2263 @defun read-quoted-char &optional prompt
2264 @cindex octal character input
2265 @cindex control characters, reading
2266 @cindex nonprinting characters, reading
2267 This function is like @code{read-char}, except that if the first
2268 character read is an octal digit (0-7), it reads any number of octal
2269 digits (but stopping if a non-octal digit is found), and returns the
2270 character represented by that numeric character code.  If the
2271 character that terminates the sequence of octal digits is @key{RET},
2272 it is discarded.  Any other terminating character is used as input
2273 after this function returns.
2275 Quitting is suppressed when the first character is read, so that the
2276 user can enter a @kbd{C-g}.  @xref{Quitting}.
2278 If @var{prompt} is supplied, it specifies a string for prompting the
2279 user.  The prompt string is always displayed in the echo area, followed
2280 by a single @samp{-}.
2282 In the following example, the user types in the octal number 177 (which
2283 is 127 in decimal).
2285 @example
2286 (read-quoted-char "What character")
2288 @group
2289 ---------- Echo Area ----------
2290 What character @kbd{1 7 7}-
2291 ---------- Echo Area ----------
2293      @result{} 127
2294 @end group
2295 @end example
2296 @end defun
2298 @need 2000
2299 @node Event Input Misc
2300 @subsection Miscellaneous Event Input Features
2302 This section describes how to ``peek ahead'' at events without using
2303 them up, how to check for pending input, and how to discard pending
2304 input.  See also the function @code{read-passwd} (@pxref{Reading a
2305 Password}).
2307 @defvar unread-command-events
2308 @cindex next input
2309 @cindex peeking at input
2310 This variable holds a list of events waiting to be read as command
2311 input.  The events are used in the order they appear in the list, and
2312 removed one by one as they are used.
2314 The variable is needed because in some cases a function reads an event
2315 and then decides not to use it.  Storing the event in this variable
2316 causes it to be processed normally, by the command loop or by the
2317 functions to read command input.
2319 @cindex prefix argument unreading
2320 For example, the function that implements numeric prefix arguments reads
2321 any number of digits.  When it finds a non-digit event, it must unread
2322 the event so that it can be read normally by the command loop.
2323 Likewise, incremental search uses this feature to unread events with no
2324 special meaning in a search, because these events should exit the search
2325 and then execute normally.
2327 The reliable and easy way to extract events from a key sequence so as to
2328 put them in @code{unread-command-events} is to use
2329 @code{listify-key-sequence} (@pxref{Strings of Events}).
2331 Normally you add events to the front of this list, so that the events
2332 most recently unread will be reread first.
2333 @end defvar
2335 @defun listify-key-sequence key
2336 This function converts the string or vector @var{key} to a list of
2337 individual events, which you can put in @code{unread-command-events}.
2338 @end defun
2340 @defvar unread-command-char
2341 This variable holds a character to be read as command input.
2342 A value of -1 means ``empty''.
2344 This variable is mostly obsolete now that you can use
2345 @code{unread-command-events} instead; it exists only to support programs
2346 written for Emacs versions 18 and earlier.
2347 @end defvar
2349 @defun input-pending-p
2350 @cindex waiting for command key input
2351 This function determines whether any command input is currently
2352 available to be read.  It returns immediately, with value @code{t} if
2353 there is available input, @code{nil} otherwise.  On rare occasions it
2354 may return @code{t} when no input is available.
2355 @end defun
2357 @defvar last-input-event
2358 @defvarx last-input-char
2359 This variable records the last terminal input event read, whether
2360 as part of a command or explicitly by a Lisp program.
2362 In the example below, the Lisp program reads the character @kbd{1},
2363 @acronym{ASCII} code 49.  It becomes the value of @code{last-input-event},
2364 while @kbd{C-e} (we assume @kbd{C-x C-e} command is used to evaluate
2365 this expression) remains the value of @code{last-command-event}.
2367 @example
2368 @group
2369 (progn (print (read-char))
2370        (print last-command-event)
2371        last-input-event)
2372      @print{} 49
2373      @print{} 5
2374      @result{} 49
2375 @end group
2376 @end example
2378 The alias @code{last-input-char} exists for compatibility with
2379 Emacs version 18.
2380 @end defvar
2382 @defun discard-input
2383 @cindex flush input
2384 @cindex discard input
2385 @cindex terminate keyboard macro
2386 This function discards the contents of the terminal input buffer and
2387 cancels any keyboard macro that might be in the process of definition.
2388 It returns @code{nil}.
2390 In the following example, the user may type a number of characters right
2391 after starting the evaluation of the form.  After the @code{sleep-for}
2392 finishes sleeping, @code{discard-input} discards any characters typed
2393 during the sleep.
2395 @example
2396 (progn (sleep-for 2)
2397        (discard-input))
2398      @result{} nil
2399 @end example
2400 @end defun
2402 @node Special Events
2403 @section Special Events
2405 @cindex special events
2406 Special events are handled at a very low level---as soon as they are
2407 read.  The @code{read-event} function processes these events itself, and
2408 never returns them.  Instead, it keeps waiting for the first event
2409 that is not special and returns that one.
2411 Events that are handled in this way do not echo, they are never grouped
2412 into key sequences, and they never appear in the value of
2413 @code{last-command-event} or @code{(this-command-keys)}.  They do not
2414 discard a numeric argument, they cannot be unread with
2415 @code{unread-command-events}, they may not appear in a keyboard macro,
2416 and they are not recorded in a keyboard macro while you are defining
2417 one.
2419 These events do, however, appear in @code{last-input-event} immediately
2420 after they are read, and this is the way for the event's definition to
2421 find the actual event.
2423 The events types @code{iconify-frame}, @code{make-frame-visible} and
2424 @code{delete-frame} are normally handled in this way.  The keymap which
2425 defines how to handle special events---and which events are special---is
2426 in the variable @code{special-event-map} (@pxref{Active Keymaps}).
2428 @node Waiting
2429 @section Waiting for Elapsed Time or Input
2430 @cindex pausing
2431 @cindex waiting
2433   The wait functions are designed to wait for a certain amount of time
2434 to pass or until there is input.  For example, you may wish to pause in
2435 the middle of a computation to allow the user time to view the display.
2436 @code{sit-for} pauses and updates the screen, and returns immediately if
2437 input comes in, while @code{sleep-for} pauses without updating the
2438 screen.
2440 @defun sit-for seconds &optional nodisp
2441 This function performs redisplay (provided there is no pending input
2442 from the user), then waits @var{seconds} seconds, or until input is
2443 available.  The value is @code{t} if @code{sit-for} waited the full
2444 time with no input arriving (see @code{input-pending-p} in @ref{Event
2445 Input Misc}).  Otherwise, the value is @code{nil}.
2447 The argument @var{seconds} need not be an integer.  If it is a floating
2448 point number, @code{sit-for} waits for a fractional number of seconds.
2449 Some systems support only a whole number of seconds; on these systems,
2450 @var{seconds} is rounded down.
2452 The expression @code{(sit-for 0)} is a convenient way to request a
2453 redisplay, without any delay.  @xref{Forcing Redisplay}.
2455 If @var{nodisp} is non-@code{nil}, then @code{sit-for} does not
2456 redisplay, but it still returns as soon as input is available (or when
2457 the timeout elapses).
2459 Iconifying or deiconifying a frame makes @code{sit-for} return, because
2460 that generates an event.  @xref{Misc Events}.
2462 The usual purpose of @code{sit-for} is to give the user time to read
2463 text that you display.
2465 It is also possible to call @code{sit-for} with three arguments,
2466 as @code{(sit-for @var{seconds} @var{millisec} @var{nodisp})},
2467 but that is considered obsolete.
2468 @end defun
2470 @defun sleep-for seconds &optional millisec
2471 This function simply pauses for @var{seconds} seconds without updating
2472 the display.  It pays no attention to available input.  It returns
2473 @code{nil}.
2475 The argument @var{seconds} need not be an integer.  If it is a floating
2476 point number, @code{sleep-for} waits for a fractional number of seconds.
2477 Some systems support only a whole number of seconds; on these systems,
2478 @var{seconds} is rounded down.
2480 The optional argument @var{millisec} specifies an additional waiting
2481 period measured in milliseconds.  This adds to the period specified by
2482 @var{seconds}.  If the system doesn't support waiting fractions of a
2483 second, you get an error if you specify nonzero @var{millisec}.
2485 Use @code{sleep-for} when you wish to guarantee a delay.
2486 @end defun
2488   @xref{Time of Day}, for functions to get the current time.
2490 @node Quitting
2491 @section Quitting
2492 @cindex @kbd{C-g}
2493 @cindex quitting
2494 @cindex interrupt Lisp functions
2496   Typing @kbd{C-g} while a Lisp function is running causes Emacs to
2497 @dfn{quit} whatever it is doing.  This means that control returns to the
2498 innermost active command loop.
2500   Typing @kbd{C-g} while the command loop is waiting for keyboard input
2501 does not cause a quit; it acts as an ordinary input character.  In the
2502 simplest case, you cannot tell the difference, because @kbd{C-g}
2503 normally runs the command @code{keyboard-quit}, whose effect is to quit.
2504 However, when @kbd{C-g} follows a prefix key, they combine to form an
2505 undefined key.  The effect is to cancel the prefix key as well as any
2506 prefix argument.
2508   In the minibuffer, @kbd{C-g} has a different definition: it aborts out
2509 of the minibuffer.  This means, in effect, that it exits the minibuffer
2510 and then quits.  (Simply quitting would return to the command loop
2511 @emph{within} the minibuffer.)  The reason why @kbd{C-g} does not quit
2512 directly when the command reader is reading input is so that its meaning
2513 can be redefined in the minibuffer in this way.  @kbd{C-g} following a
2514 prefix key is not redefined in the minibuffer, and it has its normal
2515 effect of canceling the prefix key and prefix argument.  This too
2516 would not be possible if @kbd{C-g} always quit directly.
2518   When @kbd{C-g} does directly quit, it does so by setting the variable
2519 @code{quit-flag} to @code{t}.  Emacs checks this variable at appropriate
2520 times and quits if it is not @code{nil}.  Setting @code{quit-flag}
2521 non-@code{nil} in any way thus causes a quit.
2523   At the level of C code, quitting cannot happen just anywhere; only at the
2524 special places that check @code{quit-flag}.  The reason for this is
2525 that quitting at other places might leave an inconsistency in Emacs's
2526 internal state.  Because quitting is delayed until a safe place, quitting
2527 cannot make Emacs crash.
2529   Certain functions such as @code{read-key-sequence} or
2530 @code{read-quoted-char} prevent quitting entirely even though they wait
2531 for input.  Instead of quitting, @kbd{C-g} serves as the requested
2532 input.  In the case of @code{read-key-sequence}, this serves to bring
2533 about the special behavior of @kbd{C-g} in the command loop.  In the
2534 case of @code{read-quoted-char}, this is so that @kbd{C-q} can be used
2535 to quote a @kbd{C-g}.
2537 @cindex prevent quitting
2538   You can prevent quitting for a portion of a Lisp function by binding
2539 the variable @code{inhibit-quit} to a non-@code{nil} value.  Then,
2540 although @kbd{C-g} still sets @code{quit-flag} to @code{t} as usual, the
2541 usual result of this---a quit---is prevented.  Eventually,
2542 @code{inhibit-quit} will become @code{nil} again, such as when its
2543 binding is unwound at the end of a @code{let} form.  At that time, if
2544 @code{quit-flag} is still non-@code{nil}, the requested quit happens
2545 immediately.  This behavior is ideal when you wish to make sure that
2546 quitting does not happen within a ``critical section'' of the program.
2548 @cindex @code{read-quoted-char} quitting
2549   In some functions (such as @code{read-quoted-char}), @kbd{C-g} is
2550 handled in a special way that does not involve quitting.  This is done
2551 by reading the input with @code{inhibit-quit} bound to @code{t}, and
2552 setting @code{quit-flag} to @code{nil} before @code{inhibit-quit}
2553 becomes @code{nil} again.  This excerpt from the definition of
2554 @code{read-quoted-char} shows how this is done; it also shows that
2555 normal quitting is permitted after the first character of input.
2557 @example
2558 (defun read-quoted-char (&optional prompt)
2559   "@dots{}@var{documentation}@dots{}"
2560   (let ((message-log-max nil) done (first t) (code 0) char)
2561     (while (not done)
2562       (let ((inhibit-quit first)
2563             @dots{})
2564         (and prompt (message "%s-" prompt))
2565         (setq char (read-event))
2566         (if inhibit-quit (setq quit-flag nil)))
2567       @r{@dots{}set the variable @code{code}@dots{}})
2568     code))
2569 @end example
2571 @defvar quit-flag
2572 If this variable is non-@code{nil}, then Emacs quits immediately, unless
2573 @code{inhibit-quit} is non-@code{nil}.  Typing @kbd{C-g} ordinarily sets
2574 @code{quit-flag} non-@code{nil}, regardless of @code{inhibit-quit}.
2575 @end defvar
2577 @defvar inhibit-quit
2578 This variable determines whether Emacs should quit when @code{quit-flag}
2579 is set to a value other than @code{nil}.  If @code{inhibit-quit} is
2580 non-@code{nil}, then @code{quit-flag} has no special effect.
2581 @end defvar
2583 @defmac with-local-quit forms@dots{}
2584 This macro executes @var{forms} in sequence, but allows quitting, at
2585 least locally, within @var{body} even if @code{inhibit-quit} was
2586 non-@code{nil} outside this construct.  It returns the value of the
2587 last form in @var{forms}.
2589 If @code{inhibit-quit} is @code{nil} on entry to @code{with-local-quit},
2590 it only executes the @var{forms}, and setting @code{quit-flag} causes
2591 a normal quit.  However, if @code{inhibit-quit} is non-@code{nil} so
2592 that ordinary quitting is delayed, a non-@code{nil} @code{quit-flag}
2593 triggers a special kind of local quit.  This ends the execution of
2594 @var{forms} and exits the @code{with-local-quit} form with
2595 @code{quit-flag} still non-@code{nil}, so that another (ordinary) quit
2596 will happen as soon as that is allowed.  If @code{quit-flag} is
2597 already non-@code{nil} at the beginning of @var{forms}, the local quit
2598 happens immediately and they don't execute at all.
2600 This macro is mainly useful in functions that can be called from
2601 timers, @code{pre-command-hook}, @code{post-command-hook} and other
2602 places where @code{inhibit-quit} is normally bound to @code{t}.
2603 @end defmac
2605 @deffn Command keyboard-quit
2606 This function signals the @code{quit} condition with @code{(signal 'quit
2607 nil)}.  This is the same thing that quitting does.  (See @code{signal}
2608 in @ref{Errors}.)
2609 @end deffn
2611   You can specify a character other than @kbd{C-g} to use for quitting.
2612 See the function @code{set-input-mode} in @ref{Terminal Input}.
2614 @node Prefix Command Arguments
2615 @section Prefix Command Arguments
2616 @cindex prefix argument
2617 @cindex raw prefix argument
2618 @cindex numeric prefix argument
2620   Most Emacs commands can use a @dfn{prefix argument}, a number
2621 specified before the command itself.  (Don't confuse prefix arguments
2622 with prefix keys.)  The prefix argument is at all times represented by a
2623 value, which may be @code{nil}, meaning there is currently no prefix
2624 argument.  Each command may use the prefix argument or ignore it.
2626   There are two representations of the prefix argument: @dfn{raw} and
2627 @dfn{numeric}.  The editor command loop uses the raw representation
2628 internally, and so do the Lisp variables that store the information, but
2629 commands can request either representation.
2631   Here are the possible values of a raw prefix argument:
2633 @itemize @bullet
2634 @item
2635 @code{nil}, meaning there is no prefix argument.  Its numeric value is
2636 1, but numerous commands make a distinction between @code{nil} and the
2637 integer 1.
2639 @item
2640 An integer, which stands for itself.
2642 @item
2643 A list of one element, which is an integer.  This form of prefix
2644 argument results from one or a succession of @kbd{C-u}'s with no
2645 digits.  The numeric value is the integer in the list, but some
2646 commands make a distinction between such a list and an integer alone.
2648 @item
2649 The symbol @code{-}.  This indicates that @kbd{M--} or @kbd{C-u -} was
2650 typed, without following digits.  The equivalent numeric value is
2651 @minus{}1, but some commands make a distinction between the integer
2652 @minus{}1 and the symbol @code{-}.
2653 @end itemize
2655 We illustrate these possibilities by calling the following function with
2656 various prefixes:
2658 @example
2659 @group
2660 (defun display-prefix (arg)
2661   "Display the value of the raw prefix arg."
2662   (interactive "P")
2663   (message "%s" arg))
2664 @end group
2665 @end example
2667 @noindent
2668 Here are the results of calling @code{display-prefix} with various
2669 raw prefix arguments:
2671 @example
2672         M-x display-prefix  @print{} nil
2674 C-u     M-x display-prefix  @print{} (4)
2676 C-u C-u M-x display-prefix  @print{} (16)
2678 C-u 3   M-x display-prefix  @print{} 3
2680 M-3     M-x display-prefix  @print{} 3      ; @r{(Same as @code{C-u 3}.)}
2682 C-u -   M-x display-prefix  @print{} -
2684 M--     M-x display-prefix  @print{} -      ; @r{(Same as @code{C-u -}.)}
2686 C-u - 7 M-x display-prefix  @print{} -7
2688 M-- 7   M-x display-prefix  @print{} -7     ; @r{(Same as @code{C-u -7}.)}
2689 @end example
2691   Emacs uses two variables to store the prefix argument:
2692 @code{prefix-arg} and @code{current-prefix-arg}.  Commands such as
2693 @code{universal-argument} that set up prefix arguments for other
2694 commands store them in @code{prefix-arg}.  In contrast,
2695 @code{current-prefix-arg} conveys the prefix argument to the current
2696 command, so setting it has no effect on the prefix arguments for future
2697 commands.
2699   Normally, commands specify which representation to use for the prefix
2700 argument, either numeric or raw, in the @code{interactive} declaration.
2701 (@xref{Using Interactive}.)  Alternatively, functions may look at the
2702 value of the prefix argument directly in the variable
2703 @code{current-prefix-arg}, but this is less clean.
2705 @defun prefix-numeric-value arg
2706 This function returns the numeric meaning of a valid raw prefix argument
2707 value, @var{arg}.  The argument may be a symbol, a number, or a list.
2708 If it is @code{nil}, the value 1 is returned; if it is @code{-}, the
2709 value @minus{}1 is returned; if it is a number, that number is returned;
2710 if it is a list, the @sc{car} of that list (which should be a number) is
2711 returned.
2712 @end defun
2714 @defvar current-prefix-arg
2715 This variable holds the raw prefix argument for the @emph{current}
2716 command.  Commands may examine it directly, but the usual method for
2717 accessing it is with @code{(interactive "P")}.
2718 @end defvar
2720 @defvar prefix-arg
2721 The value of this variable is the raw prefix argument for the
2722 @emph{next} editing command.  Commands such as @code{universal-argument}
2723 that specify prefix arguments for the following command work by setting
2724 this variable.
2725 @end defvar
2727 @defvar last-prefix-arg
2728 The raw prefix argument value used by the previous command.
2729 @end defvar
2731   The following commands exist to set up prefix arguments for the
2732 following command.  Do not call them for any other reason.
2734 @deffn Command universal-argument
2735 This command reads input and specifies a prefix argument for the
2736 following command.  Don't call this command yourself unless you know
2737 what you are doing.
2738 @end deffn
2740 @deffn Command digit-argument arg
2741 This command adds to the prefix argument for the following command.  The
2742 argument @var{arg} is the raw prefix argument as it was before this
2743 command; it is used to compute the updated prefix argument.  Don't call
2744 this command yourself unless you know what you are doing.
2745 @end deffn
2747 @deffn Command negative-argument arg
2748 This command adds to the numeric argument for the next command.  The
2749 argument @var{arg} is the raw prefix argument as it was before this
2750 command; its value is negated to form the new prefix argument.  Don't
2751 call this command yourself unless you know what you are doing.
2752 @end deffn
2754 @node Recursive Editing
2755 @section Recursive Editing
2756 @cindex recursive command loop
2757 @cindex recursive editing level
2758 @cindex command loop, recursive
2760   The Emacs command loop is entered automatically when Emacs starts up.
2761 This top-level invocation of the command loop never exits; it keeps
2762 running as long as Emacs does.  Lisp programs can also invoke the
2763 command loop.  Since this makes more than one activation of the command
2764 loop, we call it @dfn{recursive editing}.  A recursive editing level has
2765 the effect of suspending whatever command invoked it and permitting the
2766 user to do arbitrary editing before resuming that command.
2768   The commands available during recursive editing are the same ones
2769 available in the top-level editing loop and defined in the keymaps.
2770 Only a few special commands exit the recursive editing level; the others
2771 return to the recursive editing level when they finish.  (The special
2772 commands for exiting are always available, but they do nothing when
2773 recursive editing is not in progress.)
2775   All command loops, including recursive ones, set up all-purpose error
2776 handlers so that an error in a command run from the command loop will
2777 not exit the loop.
2779 @cindex minibuffer input
2780   Minibuffer input is a special kind of recursive editing.  It has a few
2781 special wrinkles, such as enabling display of the minibuffer and the
2782 minibuffer window, but fewer than you might suppose.  Certain keys
2783 behave differently in the minibuffer, but that is only because of the
2784 minibuffer's local map; if you switch windows, you get the usual Emacs
2785 commands.
2787 @cindex @code{throw} example
2788 @kindex exit
2789 @cindex exit recursive editing
2790 @cindex aborting
2791   To invoke a recursive editing level, call the function
2792 @code{recursive-edit}.  This function contains the command loop; it also
2793 contains a call to @code{catch} with tag @code{exit}, which makes it
2794 possible to exit the recursive editing level by throwing to @code{exit}
2795 (@pxref{Catch and Throw}).  If you throw a value other than @code{t},
2796 then @code{recursive-edit} returns normally to the function that called
2797 it.  The command @kbd{C-M-c} (@code{exit-recursive-edit}) does this.
2798 Throwing a @code{t} value causes @code{recursive-edit} to quit, so that
2799 control returns to the command loop one level up.  This is called
2800 @dfn{aborting}, and is done by @kbd{C-]} (@code{abort-recursive-edit}).
2802   Most applications should not use recursive editing, except as part of
2803 using the minibuffer.  Usually it is more convenient for the user if you
2804 change the major mode of the current buffer temporarily to a special
2805 major mode, which should have a command to go back to the previous mode.
2806 (The @kbd{e} command in Rmail uses this technique.)  Or, if you wish to
2807 give the user different text to edit ``recursively'', create and select
2808 a new buffer in a special mode.  In this mode, define a command to
2809 complete the processing and go back to the previous buffer.  (The
2810 @kbd{m} command in Rmail does this.)
2812   Recursive edits are useful in debugging.  You can insert a call to
2813 @code{debug} into a function definition as a sort of breakpoint, so that
2814 you can look around when the function gets there.  @code{debug} invokes
2815 a recursive edit but also provides the other features of the debugger.
2817   Recursive editing levels are also used when you type @kbd{C-r} in
2818 @code{query-replace} or use @kbd{C-x q} (@code{kbd-macro-query}).
2820 @defun recursive-edit
2821 @cindex suspend evaluation
2822 This function invokes the editor command loop.  It is called
2823 automatically by the initialization of Emacs, to let the user begin
2824 editing.  When called from a Lisp program, it enters a recursive editing
2825 level.
2827   In the following example, the function @code{simple-rec} first
2828 advances point one word, then enters a recursive edit, printing out a
2829 message in the echo area.  The user can then do any editing desired, and
2830 then type @kbd{C-M-c} to exit and continue executing @code{simple-rec}.
2832 @example
2833 (defun simple-rec ()
2834   (forward-word 1)
2835   (message "Recursive edit in progress")
2836   (recursive-edit)
2837   (forward-word 1))
2838      @result{} simple-rec
2839 (simple-rec)
2840      @result{} nil
2841 @end example
2842 @end defun
2844 @deffn Command exit-recursive-edit
2845 This function exits from the innermost recursive edit (including
2846 minibuffer input).  Its definition is effectively @code{(throw 'exit
2847 nil)}.
2848 @end deffn
2850 @deffn Command abort-recursive-edit
2851 This function aborts the command that requested the innermost recursive
2852 edit (including minibuffer input), by signaling @code{quit}
2853 after exiting the recursive edit.  Its definition is effectively
2854 @code{(throw 'exit t)}.  @xref{Quitting}.
2855 @end deffn
2857 @deffn Command top-level
2858 This function exits all recursive editing levels; it does not return a
2859 value, as it jumps completely out of any computation directly back to
2860 the main command loop.
2861 @end deffn
2863 @defun recursion-depth
2864 This function returns the current depth of recursive edits.  When no
2865 recursive edit is active, it returns 0.
2866 @end defun
2868 @node Disabling Commands
2869 @section Disabling Commands
2870 @cindex disabled command
2872   @dfn{Disabling a command} marks the command as requiring user
2873 confirmation before it can be executed.  Disabling is used for commands
2874 which might be confusing to beginning users, to prevent them from using
2875 the commands by accident.
2877 @kindex disabled
2878   The low-level mechanism for disabling a command is to put a
2879 non-@code{nil} @code{disabled} property on the Lisp symbol for the
2880 command.  These properties are normally set up by the user's
2881 init file (@pxref{Init File}) with Lisp expressions such as this:
2883 @example
2884 (put 'upcase-region 'disabled t)
2885 @end example
2887 @noindent
2888 For a few commands, these properties are present by default (you can
2889 remove them in your init file if you wish).
2891   If the value of the @code{disabled} property is a string, the message
2892 saying the command is disabled includes that string.  For example:
2894 @example
2895 (put 'delete-region 'disabled
2896      "Text deleted this way cannot be yanked back!\n")
2897 @end example
2899   @xref{Disabling,,, emacs, The GNU Emacs Manual}, for the details on
2900 what happens when a disabled command is invoked interactively.
2901 Disabling a command has no effect on calling it as a function from Lisp
2902 programs.
2904 @deffn Command enable-command command
2905 Allow @var{command} (a symbol) to be executed without special
2906 confirmation from now on, and alter the user's init file (@pxref{Init
2907 File}) so that this will apply to future sessions.
2908 @end deffn
2910 @deffn Command disable-command command
2911 Require special confirmation to execute @var{command} from now on, and
2912 alter the user's init file so that this will apply to future sessions.
2913 @end deffn
2915 @defvar disabled-command-function
2916 The value of this variable should be a function.  When the user
2917 invokes a disabled command interactively, this function is called
2918 instead of the disabled command.  It can use @code{this-command-keys}
2919 to determine what the user typed to run the command, and thus find the
2920 command itself.
2922 The value may also be @code{nil}.  Then all commands work normally,
2923 even disabled ones.
2925 By default, the value is a function that asks the user whether to
2926 proceed.
2927 @end defvar
2929 @node Command History
2930 @section Command History
2931 @cindex command history
2932 @cindex complex command
2933 @cindex history of commands
2935   The command loop keeps a history of the complex commands that have
2936 been executed, to make it convenient to repeat these commands.  A
2937 @dfn{complex command} is one for which the interactive argument reading
2938 uses the minibuffer.  This includes any @kbd{M-x} command, any
2939 @kbd{M-:} command, and any command whose @code{interactive}
2940 specification reads an argument from the minibuffer.  Explicit use of
2941 the minibuffer during the execution of the command itself does not cause
2942 the command to be considered complex.
2944 @defvar command-history
2945 This variable's value is a list of recent complex commands, each
2946 represented as a form to evaluate.  It continues to accumulate all
2947 complex commands for the duration of the editing session, but when it
2948 reaches the maximum size (@pxref{Minibuffer History}), the oldest
2949 elements are deleted as new ones are added.
2951 @example
2952 @group
2953 command-history
2954 @result{} ((switch-to-buffer "chistory.texi")
2955     (describe-key "^X^[")
2956     (visit-tags-table "~/emacs/src/")
2957     (find-tag "repeat-complex-command"))
2958 @end group
2959 @end example
2960 @end defvar
2962   This history list is actually a special case of minibuffer history
2963 (@pxref{Minibuffer History}), with one special twist: the elements are
2964 expressions rather than strings.
2966   There are a number of commands devoted to the editing and recall of
2967 previous commands.  The commands @code{repeat-complex-command}, and
2968 @code{list-command-history} are described in the user manual
2969 (@pxref{Repetition,,, emacs, The GNU Emacs Manual}).  Within the
2970 minibuffer, the usual minibuffer history commands are available.
2972 @node Keyboard Macros
2973 @section Keyboard Macros
2974 @cindex keyboard macros
2976   A @dfn{keyboard macro} is a canned sequence of input events that can
2977 be considered a command and made the definition of a key.  The Lisp
2978 representation of a keyboard macro is a string or vector containing the
2979 events.  Don't confuse keyboard macros with Lisp macros
2980 (@pxref{Macros}).
2982 @defun execute-kbd-macro kbdmacro &optional count loopfunc
2983 This function executes @var{kbdmacro} as a sequence of events.  If
2984 @var{kbdmacro} is a string or vector, then the events in it are executed
2985 exactly as if they had been input by the user.  The sequence is
2986 @emph{not} expected to be a single key sequence; normally a keyboard
2987 macro definition consists of several key sequences concatenated.
2989 If @var{kbdmacro} is a symbol, then its function definition is used in
2990 place of @var{kbdmacro}.  If that is another symbol, this process repeats.
2991 Eventually the result should be a string or vector.  If the result is
2992 not a symbol, string, or vector, an error is signaled.
2994 The argument @var{count} is a repeat count; @var{kbdmacro} is executed that
2995 many times.  If @var{count} is omitted or @code{nil}, @var{kbdmacro} is
2996 executed once.  If it is 0, @var{kbdmacro} is executed over and over until it
2997 encounters an error or a failing search.
2999 If @var{loopfunc} is non-@code{nil}, it is a function that is called,
3000 without arguments, prior to each iteration of the macro.  If
3001 @var{loopfunc} returns @code{nil}, then this stops execution of the macro.
3003 @xref{Reading One Event}, for an example of using @code{execute-kbd-macro}.
3004 @end defun
3006 @defvar executing-kbd-macro
3007 This variable contains the string or vector that defines the keyboard
3008 macro that is currently executing.  It is @code{nil} if no macro is
3009 currently executing.  A command can test this variable so as to behave
3010 differently when run from an executing macro.  Do not set this variable
3011 yourself.
3012 @end defvar
3014 @defvar defining-kbd-macro
3015 This variable is non-@code{nil} if and only if a keyboard macro is
3016 being defined.  A command can test this variable so as to behave
3017 differently while a macro is being defined.  The commands
3018 @code{start-kbd-macro} and @code{end-kbd-macro} set this variable---do
3019 not set it yourself.
3021 The variable is always local to the current terminal and cannot be
3022 buffer-local.  @xref{Multiple Displays}.
3023 @end defvar
3025 @defvar last-kbd-macro
3026 This variable is the definition of the most recently defined keyboard
3027 macro.  Its value is a string or vector, or @code{nil}.
3029 The variable is always local to the current terminal and cannot be
3030 buffer-local.  @xref{Multiple Displays}.
3031 @end defvar
3033 @defvar kbd-macro-termination-hook
3034 This normal hook (@pxref{Standard Hooks}) is run when a keyboard
3035 macro terminates, regardless of what caused it to terminate (reaching
3036 the macro end or an error which ended the macro prematurely).
3037 @end defvar
3039 @ignore
3040    arch-tag: e34944ad-7d5c-4980-be00-36a5fe54d4b1
3041 @end ignore