Mercurial > emacs

changeset 5888:0d02ee7ee659

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(read_filtered_event): Retry read_char after a buffer change.
author Karl Heuer <kwzh@gnu.org>
date Fri, 11 Feb 1994 01:29:24 +0000
parents c4030d39f26d
children 06bbb0e856d7
files src/lread.c
diffstat 1 files changed, 3 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/lread.c	Fri Feb 11 00:13:59 1994 +0000
+++ b/src/lread.c	Fri Feb 11 01:29:24 1994 +0000
@@ -216,6 +216,9 @@
  retry:
   val = read_char (0, 0, 0, Qnil, 0);
 
+  if (XTYPE (val) == Lisp_Buffer)
+    goto retry;
+
   /* switch-frame events are put off until after the next ASCII
      character.  This is better than signalling an error just because
      the last characters were typed to a separate minibuffer frame,