# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 743492991 0
# Node ID 8f02e992e4dc33689f277e7795a38450c09b2b65
# Parent  f8b1ea675224ceaf9e103034051d85cfc6d54db7
(face_name_id_number): Use assq_no_quit, not Fassq.

diff -r f8b1ea675224 -r 8f02e992e4dc src/xfaces.c
--- a/src/xfaces.c	Sat Jul 24 05:47:16 1993 +0000
+++ b/src/xfaces.c	Sat Jul 24 05:49:51 1993 +0000
@@ -1079,7 +1079,7 @@
 {
   Lisp_Object tem;
 
-  tem = Fcdr (Fassq (name, f->face_alist));
+  tem = Fcdr (assq_no_quit (name, f->face_alist));
   if (NILP (tem))
     return 0;
   CHECK_VECTOR (tem, 0);