comparison src/keyboard.c @ 7502:30ce667c8026

(bind_polling_period): Never decrease polling_period. (echo): Don't echo motion events.

7501:7196bd4f57d4

    {
      int i;
      immediate_echo = 1;

      for (i = 0; i < this_command_key_count; i++)
	echo_char (XVECTOR (this_command_keys)->contents[i]);
      echo_dash ();
    }

  echoing = 1;
  message1 (echobuf);

    }
  poll_suppress_count = count;
#endif
}

bind_polling_period (n)
     int n;
{
#ifdef POLL_FOR_INPUT
  stop_polling ();
  specbind (Qpolling_period, make_number (n));
  start_polling ();
#endif
}

/* Applying the control modifier to CHARACTER.  */

7502:30ce667c8026

    {
      int i;
      immediate_echo = 1;

      for (i = 0; i < this_command_key_count; i++)
	{
	  Lisp_Object c;
	  c = XVECTOR (this_command_keys)->contents[i];
	  if (! (EVENT_HAS_PARAMETERS (c)
		 && EQ (EVENT_HEAD_KIND (EVENT_HEAD (c)), Qmouse_movement)))
	    echo_char (c);
	}
      echo_dash ();
    }

  echoing = 1;
  message1 (echobuf);

    }
  poll_suppress_count = count;
#endif
}

/* Bind polling_period to a value at least N.
   But don't decrease it.  */

bind_polling_period (n)
     int n;
{
#ifdef POLL_FOR_INPUT
  int new = polling_period;

  if (n > new)
    new = n;

  stop_polling ();
  specbind (Qpolling_period, make_number (new));
  /* Start a new alarm with the new period.  */
  start_polling ();
#endif
}

/* Applying the control modifier to CHARACTER.  */