mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-03 02:31:03 -08:00
(Interactive Call): commandp has new arg.
(Command Loop Info): Add this-original-command.
This commit is contained in:
parent
1002b9b5d9
commit
041b0e7bd7
1 changed files with 15 additions and 5 deletions
|
|
@ -503,7 +503,7 @@ command is a function, @code{command-execute} calls
|
|||
@code{call-interactively}, which reads the arguments and calls the
|
||||
command. You can also call these functions yourself.
|
||||
|
||||
@defun commandp object
|
||||
@defun commandp object &optional for-call-interactively
|
||||
Returns @code{t} if @var{object} is suitable for calling interactively;
|
||||
that is, if @var{object} is a command. Otherwise, returns @code{nil}.
|
||||
|
||||
|
|
@ -514,11 +514,13 @@ expressions, autoload objects that are declared as interactive
|
|||
(non-@code{nil} fourth argument to @code{autoload}), and some of the
|
||||
primitive functions.
|
||||
|
||||
A symbol satisfies @code{commandp} if its function definition satisfies
|
||||
@code{commandp}.
|
||||
A symbol satisfies @code{commandp} if its function definition
|
||||
satisfies @code{commandp}. Keys and keymaps are not commands.
|
||||
Rather, they are used to look up commands (@pxref{Keymaps}).
|
||||
|
||||
Keys and keymaps are not commands. Rather, they are used to look up
|
||||
commands (@pxref{Keymaps}).
|
||||
If @var{for-call-interactively} is non-@code{nil}, then
|
||||
@code{commandp} returns @code{t} only for objects that
|
||||
@code{call-interactively} could call---thus, not for keyboard macros.
|
||||
|
||||
See @code{documentation} in @ref{Accessing Documentation}, for a
|
||||
realistic example of using @code{commandp}.
|
||||
|
|
@ -731,6 +733,14 @@ We do not bind @code{this-command} with @code{let} because that would
|
|||
restore the old value in case of error---a feature of @code{let} which
|
||||
in this case does precisely what we want to avoid.
|
||||
|
||||
@defvar this-original-command
|
||||
This has the same value as @code{this-command} except when command
|
||||
remapping occurs (@pxref{Remapping Commands}). In that case,
|
||||
@code{this-command} gives the command actually run (the result of
|
||||
remapping), and @code{this-original-command} gives the command that
|
||||
was specified to run but remapped into another command.
|
||||
@end defvar
|
||||
|
||||
@defun this-command-keys
|
||||
This function returns a string or vector containing the key sequence
|
||||
that invoked the present command, plus any previous commands that
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue