diff options
| author | Michaël Cadilhac | 2007-09-10 09:41:13 +0000 |
|---|---|---|
| committer | Michaël Cadilhac | 2007-09-10 09:41:13 +0000 |
| commit | 04724b6930ec6a906fd5a248632797bb56e0caa5 (patch) | |
| tree | ab3bc8394fdf954fe16535bc772d94d701e10bc2 /src/eval.c | |
| parent | 4bca9161bdb6896aeee8a85c8a31f0f9fbd23c59 (diff) | |
| download | emacs-04724b6930ec6a906fd5a248632797bb56e0caa5.tar.gz emacs-04724b6930ec6a906fd5a248632797bb56e0caa5.zip | |
(Fcommandp): Change `->prompt' to `->intspec'.
Diffstat (limited to 'src/eval.c')
| -rw-r--r-- | src/eval.c | 2 |
1 files changed, 1 insertions, 1 deletions
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. */) | |||
| 2078 | /* Emacs primitives are interactive if their DEFUN specifies an | 2078 | /* Emacs primitives are interactive if their DEFUN specifies an |
| 2079 | interactive spec. */ | 2079 | interactive spec. */ |
| 2080 | if (SUBRP (fun)) | 2080 | if (SUBRP (fun)) |
| 2081 | return XSUBR (fun)->prompt ? Qt : if_prop; | 2081 | return XSUBR (fun)->intspec ? Qt : if_prop; |
| 2082 | 2082 | ||
| 2083 | /* Bytecode objects are interactive if they are long enough to | 2083 | /* Bytecode objects are interactive if they are long enough to |
| 2084 | have an element whose index is COMPILED_INTERACTIVE, which is | 2084 | have an element whose index is COMPILED_INTERACTIVE, which is |