204 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
205 |
|
|
206 |
(defun facep (face) |
(defun facep (face) |
207 |
"Return non-nil if FACE is a face name." |
"Return non-nil if FACE is a face name or internal face object. |
208 |
|
Return nil otherwise. A face name can be a string or a symbol. |
209 |
|
An internal face object is a vector of the kind used internally |
210 |
|
to record face data." |
211 |
(internal-lisp-face-p face)) |
(internal-lisp-face-p face)) |
212 |
|
|
213 |
|
|