From 31ace7d0650710af395119f6d3a2f07d9b7e73c0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Pavel=20Jan=C3=ADk?= <Pavel@Janik.cz>
Date: Sat, 22 Dec 2001 13:55:34 +0000
Subject: [PATCH] Do not include mocklisp.h. (Fcall_interactively): Do not test
 for mocklisp case.

---
 src/callint.c | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/src/callint.c b/src/callint.c
index f84d0048877..6e835d51b18 100644
--- a/src/callint.c
+++ b/src/callint.c
@@ -27,7 +27,6 @@ Boston, MA 02111-1307, USA.  */
 #include "commands.h"
 #include "keyboard.h"
 #include "window.h"
-#include "mocklisp.h"
 #include "keymap.h"
 
 #ifdef HAVE_INDEX
@@ -278,11 +277,6 @@ supply if the command inquires which events were used to invoke it.  */)
 	goto lose;
       specs = Fcar (Fcdr (specs));
     }
-  else if (EQ (funcar, Qmocklisp))
-    {
-      single_kboard_state ();
-      return ml_apply (fun, Qinteractive);
-    }
   else
     goto lose;