diff options
| -rw-r--r-- | src/ChangeLog | 2 | ||||
| -rw-r--r-- | src/eval.c | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/src/ChangeLog b/src/ChangeLog index 9dcbaa21fa5..19854387b6a 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -3,6 +3,8 @@ * lisp.h (struct Lisp_Subr): Rename `prompt' field to `intspec'. (DEFUN): Document `intspec', use it instead of `prompt'. + * eval.c (Fcommandp): Change `->prompt' to `->intspec'. + * callint.c (Fcall_interactively): Comment fixes. 2007-09-10 Stefan Monnier <monnier@iro.umontreal.ca> diff --git a/src/eval.c b/src/eval.c index 830476a61bc..26332fa9dfb 100644 --- a/src/eval.c +++ b/src/eval.c @@ -2078,7 +2078,7 @@ then strings and vectors are not accepted. */) /* Emacs primitives are interactive if their DEFUN specifies an interactive spec. */ if (SUBRP (fun)) - return XSUBR (fun)->prompt ? Qt : if_prop; + return XSUBR (fun)->intspec ? Qt : if_prop; /* Bytecode objects are interactive if they are long enough to have an element whose index is COMPILED_INTERACTIVE, which is |