Mercurial > emacs

changeset 37317:36d04528f2aa

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fplist_get): Don't QUIT is interrupt_input_blocked.
author Gerd Moellmann <gerd@gnu.org>
date Wed, 11 Apr 2001 12:57:50 +0000
parents 171ad460e884
children adea98b027a5
files src/fns.c
diffstat 1 files changed, 6 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/fns.c	Wed Apr 11 08:36:45 2001 +0000
+++ b/src/fns.c	Wed Apr 11 12:57:50 2001 +0000
@@ -1872,7 +1872,11 @@
     {
       if (EQ (prop, XCAR (tail)))
 	return XCAR (XCDR (tail));
-      QUIT;
+
+      /* This function can be called asynchronously
+	 (setup_coding_system).  Don't QUIT in that case.  */
+      if (!interrupt_input_blocked)
+	QUIT;
     }
 
   if (!NILP (tail))
@@ -1915,6 +1919,7 @@
 	  Fsetcar (XCDR (tail), val);
 	  return plist;
 	}
+      
       prev = tail;
       QUIT;
     }