Mercurial > emacs

diff src/lread.c @ 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 2f22c0c6f021
children 8af8f6b469e1
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,