/[emacs]/emacs/src/callint.c
ViewVC logotype

Diff of /emacs/src/callint.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.110 by pj, Fri Nov 2 20:17:31 2001 UTC revision 1.111 by pj, Sat Dec 22 13:55:34 2001 UTC
# Line 27  Boston, MA 02111-1307, USA.  */ Line 27  Boston, MA 02111-1307, USA.  */
27  #include "commands.h"  #include "commands.h"
28  #include "keyboard.h"  #include "keyboard.h"
29  #include "window.h"  #include "window.h"
 #include "mocklisp.h"  
30  #include "keymap.h"  #include "keymap.h"
31    
32  #ifdef HAVE_INDEX  #ifdef HAVE_INDEX
# Line 278  supply if the command inquires which eve Line 277  supply if the command inquires which eve
277          goto lose;          goto lose;
278        specs = Fcar (Fcdr (specs));        specs = Fcar (Fcdr (specs));
279      }      }
   else if (EQ (funcar, Qmocklisp))  
     {  
       single_kboard_state ();  
       return ml_apply (fun, Qinteractive);  
     }  
280    else    else
281      goto lose;      goto lose;
282    

Legend:
Removed from v.1.110  
changed lines
  Added in v.1.111

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26