Mercurial > emacs
comparison src/xfaces.c @ 55949:50599d471b66
Revision: miles@gnu.org--gnu-2004/emacs--cvs-trunk--0--patch-377
(Fdisplay_supports_face_attributes_p): Work around bootstrapping problem
author | Miles Bader <miles@gnu.org> |
---|---|
date | Sun, 06 Jun 2004 09:49:12 +0000 |
parents | 0b7bab25fcec |
children | b9f354f2c61f |
comparison
equal
deleted
inserted
replaced
55948:424252fc748e | 55949:50599d471b66 |
---|---|
6025 Lisp_Object frame; | 6025 Lisp_Object frame; |
6026 struct frame *f; | 6026 struct frame *f; |
6027 struct face *def_face; | 6027 struct face *def_face; |
6028 Lisp_Object attrs[LFACE_VECTOR_SIZE]; | 6028 Lisp_Object attrs[LFACE_VECTOR_SIZE]; |
6029 | 6029 |
6030 if (noninteractive || !initialized) | |
6031 /* We may not be able to access low-level face information in batch | |
6032 mode, or before being dumped, and this function is not going to | |
6033 be very useful in those cases anyway, so just give up. */ | |
6034 return Qnil; | |
6035 | |
6030 if (NILP (display)) | 6036 if (NILP (display)) |
6031 frame = selected_frame; | 6037 frame = selected_frame; |
6032 else if (FRAMEP (display)) | 6038 else if (FRAMEP (display)) |
6033 frame = display; | 6039 frame = display; |
6034 else | 6040 else |