# HG changeset patch
# User Pavel Jan���k <Pavel@Janik.cz>
# Date 1009029334 0
# Node ID 81176c96cc2f3ea9e947989845c4d4a76e1d2be1
# Parent  9a040e975992b5e5c34bcc7bf38b2a7244102100
Do not include mocklisp.h.
(Fcall_interactively): Do not test for mocklisp case.

diff -r 9a040e975992 -r 81176c96cc2f src/callint.c
--- a/src/callint.c	Sat Dec 22 13:49:19 2001 +0000
+++ b/src/callint.c	Sat Dec 22 13:55:34 2001 +0000
@@ -27,7 +27,6 @@
 #include "commands.h"
 #include "keyboard.h"
 #include "window.h"
-#include "mocklisp.h"
 #include "keymap.h"
 
 #ifdef HAVE_INDEX
@@ -278,11 +277,6 @@
 	goto lose;
       specs = Fcar (Fcdr (specs));
     }
-  else if (EQ (funcar, Qmocklisp))
-    {
-      single_kboard_state ();
-      return ml_apply (fun, Qinteractive);
-    }
   else
     goto lose;