(Ftop_level): Let Fthrow deal with UNBLOCK_INPUT.
This commit is contained in:
parent
c1788fbc8b
commit
85d964de72
2 changed files with 17 additions and 5 deletions
|
@ -1,3 +1,15 @@
|
|||
2005-03-06 Richard M. Stallman <rms@gnu.org>
|
||||
|
||||
* keyboard.c (Ftop_level): Let Fthrow deal with UNBLOCK_INPUT.
|
||||
|
||||
* eval.c (unwind_to_catch): Use UNBLOCK_INPUT_TO.
|
||||
(Feval, Ffuncall): Use CHECK_CONS_LIST.
|
||||
|
||||
* lisp.h (CHECK_CONS_LIST): New macro (two definitions).
|
||||
|
||||
* blockinput.h (UNBLOCK_INPUT_TO): New macro.
|
||||
(TOTALLY_UNBLOCK_INPUT): Handle a pending signal if any.
|
||||
|
||||
2005-03-05 Juri Linkov <juri@jurta.org>
|
||||
|
||||
* emacs.c (USAGE1): Replace Info node name "command arguments"
|
||||
|
@ -107,6 +119,11 @@
|
|||
|
||||
* keyboard.c (Fposn_at_x_y): Check integerness of X and Y.
|
||||
|
||||
2005-02-27 Richard M. Stallman <rms@gnu.org>
|
||||
|
||||
* xdisp.c (fast_find_position): Rename END to BEG.
|
||||
(syms_of_xdisp) <menu-bar-update-hook>: Doc fix.
|
||||
|
||||
2005-02-27 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
|
||||
|
||||
* gtkutil.c (xg_resize_outer_widget): Remove unneeded call to
|
||||
|
|
|
@ -1350,11 +1350,6 @@ DEFUN ("top-level", Ftop_level, Stop_level, 0, 0, "",
|
|||
cancel_hourglass ();
|
||||
#endif
|
||||
|
||||
/* Unblock input if we enter with input blocked. This may happen if
|
||||
redisplay traps e.g. during tool-bar update with input blocked. */
|
||||
while (INPUT_BLOCKED_P)
|
||||
UNBLOCK_INPUT;
|
||||
|
||||
return Fthrow (Qtop_level, Qnil);
|
||||
}
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue