(Fcommandp): Change `->prompt' to `->intspec'.

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