X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fcmdloop.c;h=b54b23ca038ce7f699936e35c83aea9e95025eb7;hb=e47e95aae354b619b35d5770cc67ca8ec0fe56ad;hp=80a99dc2a16a1fabcaeaa2ae45f8133f31808405;hpb=98a6e4055a1fa624c592ac06f79287d55196ca37;p=chise%2Fxemacs-chise.git.1

diff --git a/src/cmdloop.c b/src/cmdloop.c
index 80a99dc..b54b23c 100644
--- a/src/cmdloop.c
+++ b/src/cmdloop.c
@@ -38,7 +38,7 @@ Boston, MA 02111-1307, USA.  */
 #include "window.h"
 
 /* Current depth in recursive edits.  */
-int command_loop_level;
+Fixnum command_loop_level;
 
 #ifndef LISP_COMMAND_LOOP
 /* Form to evaluate (if non-nil) when Emacs is started.  */
@@ -415,7 +415,7 @@ Lisp_Object
 call_command_loop (Lisp_Object catch_errors)
 {
   /* This function can GC */
-  reset_this_command_keys (Vselected_console, Qnil); /* #### bleagh */
+  reset_this_command_keys (Vselected_console, 0); /* #### bleagh */
 
  loop:
   for (;;)