# HG changeset patch
# User Micha¸«³l Cadilhac <michael.cadilhac@lrde.org>
# Date 1189417263 0
# Node ID b1c7d00cbbb0753ac9b6f08b4e99b997b52d7b0a
# Parent  12dc4aa162c737d3c81006216a1837c21a17f5e6
(Fcommandp): Change `->prompt' to `->intspec'.

diff -r 12dc4aa162c7 -r b1c7d00cbbb0 src/eval.c
--- a/src/eval.c	Mon Sep 10 09:40:37 2007 +0000
+++ b/src/eval.c	Mon Sep 10 09:41:03 2007 +0000
@@ -2078,7 +2078,7 @@
   /* 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