Mercurial > emacs
comparison lisp/faces.el @ 46053:ef0684c3e07b
(frame-update-faces): Fix obsolescence declaration.
(internal-get-face): Remove redundant info from docstring and
fix obsolescence declaration.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Thu, 27 Jun 2002 16:09:19 +0000 |
| parents | 53b3233b2574 |
| children | 9319ffebc601 |
comparison
equal
deleted
inserted
replaced
| 46052:4d27fe417297 | 46053:ef0684c3e07b |
|---|---|
| 194 (defun internal-get-face (name &optional frame) | 194 (defun internal-get-face (name &optional frame) |
| 195 "Retrieve the face named NAME; error if there is none. | 195 "Retrieve the face named NAME; error if there is none. |
| 196 If the optional argument FRAME is given, this gets the face NAME for | 196 If the optional argument FRAME is given, this gets the face NAME for |
| 197 that frame; otherwise, it uses the selected frame. | 197 that frame; otherwise, it uses the selected frame. |
| 198 If FRAME is the symbol t, then the global, non-frame face is returned. | 198 If FRAME is the symbol t, then the global, non-frame face is returned. |
| 199 If NAME is already a face, it is simply returned. | 199 If NAME is already a face, it is simply returned." |
| 200 | |
| 201 This function is defined for compatibility with Emacs 20.2. It | |
| 202 should not be used anymore." | |
| 203 (or (facep name) | 200 (or (facep name) |
| 204 (check-face name))) | 201 (check-face name))) |
| 205 (make-obsolete 'internal-get-face "See `facep' and `check-face'." "21.1") | 202 (make-obsolete 'internal-get-face "see `facep' and `check-face'." "21.1") |
| 206 | 203 |
| 207 | 204 |
| 208 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 205 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 209 ;;; Predicates, type checks. | 206 ;;; Predicates, type checks. |
| 210 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 207 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 1753 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; | 1750 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| 1754 | 1751 |
| 1755 ;; Update a frame's faces when we change its default font. | 1752 ;; Update a frame's faces when we change its default font. |
| 1756 | 1753 |
| 1757 (defalias 'frame-update-faces 'ignore) | 1754 (defalias 'frame-update-faces 'ignore) |
| 1758 (make-obsolete 'frame-update-faces "No longer necessary" "21.1") | 1755 (make-obsolete 'frame-update-faces "no longer necessary." "21.1") |
| 1759 | 1756 |
| 1760 ;; Update the colors of FACE, after FRAME's own colors have been | 1757 ;; Update the colors of FACE, after FRAME's own colors have been |
| 1761 ;; changed. | 1758 ;; changed. |
| 1762 | 1759 |
| 1763 (defalias 'frame-update-face-colors 'frame-set-background-mode) | 1760 (defalias 'frame-update-face-colors 'frame-set-background-mode) |