Mercurial > emacs
diff src/fns.c @ 37317:36d04528f2aa
(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 | aecc289cb0de |
| children | b481b8cc3923 |
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; }
