comparison src/keyboard.c @ 104235:b729d024f6dc

* cmds.c (nonundocount): New global variable. (keys_of_cmds): Initialize it. (Fself_insert_command): Use it to combine upto 20 sequential chars into a single undo entry, just like the Qself_insert_command code in keyboard.c does. Call frame_make_pointer_invisible, also like the Qself_insert_command code in keyboard.c does. * keyboard.c (command_loop_1): Use the new global nonundocount rather than its own local replacement for it.

104234:e2940cb3d84e

  cancel_hourglass ();
  return Qnil;
}
#endif

Lisp_Object
command_loop_1 ()
{
  Lisp_Object cmd;
  int lose;
  int nonundocount;
  Lisp_Object keybuf[30];
  int i;
  int prev_modiff = 0;
  struct buffer *prev_buffer = NULL;
#if 0 /* This shouldn't be necessary anymore.  --lorentey  */

  current_kboard->Vlast_prefix_arg = Qnil;
  Vdeactivate_mark = Qnil;
  waiting_for_input = 0;
  cancel_echoing ();

  nonundocount = 0;
  this_command_key_count = 0;
  this_command_key_count_reset = 0;
  this_single_command_key_start = 0;

  if (NILP (Vmemory_full))

                start_hourglass ();
              }
#endif

            nonundocount = 0;
            if (NILP (current_kboard->Vprefix_arg))
              Fundo_boundary ();
            Fcommand_execute (Vthis_command, Qnil, Qnil, Qnil);

#ifdef HAVE_WINDOW_SYSTEM
	  /* Do not check display_hourglass_p here, because

104235:b729d024f6dc

  cancel_hourglass ();
  return Qnil;
}
#endif

extern int nonundocount;	/* Declared in cmds.c.  */

Lisp_Object
command_loop_1 ()
{
  Lisp_Object cmd;
  int lose;
  Lisp_Object keybuf[30];
  int i;
  int prev_modiff = 0;
  struct buffer *prev_buffer = NULL;
#if 0 /* This shouldn't be necessary anymore.  --lorentey  */

  current_kboard->Vlast_prefix_arg = Qnil;
  Vdeactivate_mark = Qnil;
  waiting_for_input = 0;
  cancel_echoing ();

  this_command_key_count = 0;
  this_command_key_count_reset = 0;
  this_single_command_key_start = 0;

  if (NILP (Vmemory_full))

                start_hourglass ();
              }
#endif

            nonundocount = 0;
            if (NILP (current_kboard->Vprefix_arg)) /* FIXME: Why?  --Stef  */
              Fundo_boundary ();
            Fcommand_execute (Vthis_command, Qnil, Qnil, Qnil);

#ifdef HAVE_WINDOW_SYSTEM
	  /* Do not check display_hourglass_p here, because