Mercurial > emacs
comparison lisp/faces.el @ 19238:24bfe6095dfe
(set-face-doc-string): Define once again, as alias.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 09 Aug 1997 03:34:34 +0000 |
| parents | 8aad7cef6fc0 |
| children | 11d21b4613cd |
comparison
equal
deleted
inserted
replaced
| 19237:42cc2b7bc6c6 | 19238:24bfe6095dfe |
|---|---|
| 276 If the optional FRAME argument is provided, change only | 276 If the optional FRAME argument is provided, change only |
| 277 in that frame; otherwise change each frame." | 277 in that frame; otherwise change each frame." |
| 278 (cond ((eq italic-p nil) (make-face-unitalic face frame t)) | 278 (cond ((eq italic-p nil) (make-face-unitalic face frame t)) |
| 279 (t (make-face-italic face frame t)))) | 279 (t (make-face-italic face frame t)))) |
| 280 | 280 |
| 281 (defalias 'set-face-doc-string 'set-face-documentation) | |
| 281 (defun set-face-documentation (face string) | 282 (defun set-face-documentation (face string) |
| 282 "Set the documentation string for FACE to STRING." | 283 "Set the documentation string for FACE to STRING." |
| 283 (put face 'face-documentation string)) | 284 (put face 'face-documentation string)) |
| 284 | 285 |
| 285 (defun modify-face-read-string (face default name alist) | 286 (defun modify-face-read-string (face default name alist) |