Mercurial > emacs
comparison lisp/faces.el @ 63775:7878662e4c72
(facep): Doc fix.
| author | Luc Teirlinck <teirllm@auburn.edu> |
|---|---|
| date | Sat, 25 Jun 2005 23:48:27 +0000 |
| parents | 7f05fee725b0 |
| children | 379e37eca752 ebfb2856c8e6 |
comparison
equal
deleted
inserted
replaced
| 63774:ab5140e18bc9 | 63775:7878662e4c72 |
|---|---|
| 202 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 202 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 203 ;;; Predicates, type checks. | 203 ;;; Predicates, type checks. |
| 204 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 204 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 205 | 205 |
| 206 (defun facep (face) | 206 (defun facep (face) |
| 207 "Return non-nil if FACE is a face name." | 207 "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." | |
| 208 (internal-lisp-face-p face)) | 211 (internal-lisp-face-p face)) |
| 209 | 212 |
| 210 | 213 |
| 211 (defun check-face (face) | 214 (defun check-face (face) |
| 212 "Signal an error if FACE doesn't name a face. | 215 "Signal an error if FACE doesn't name a face. |