diff options
| author | Eli Zaretskii | 2025-06-07 12:43:39 +0300 |
|---|---|---|
| committer | Eli Zaretskii | 2025-06-07 12:43:39 +0300 |
| commit | 0bc2a5a2c178ac5e79ea577affe91e711b410123 (patch) | |
| tree | e583ba5a724c0dc58aa32424fb0f0a96335669a5 | |
| parent | 13fa74b73c36de2439f7cae13f25647fb46161e9 (diff) | |
| download | emacs-0bc2a5a2c178ac5e79ea577affe91e711b410123.tar.gz emacs-0bc2a5a2c178ac5e79ea577affe91e711b410123.zip | |
; Fix last change (bug#77945)
* lisp/faces.el (face-all-attributes):
* etc/NEWS: Reformat and fix wording in documentation.
| -rw-r--r-- | etc/NEWS | 4 | ||||
| -rw-r--r-- | lisp/faces.el | 10 |
2 files changed, 7 insertions, 7 deletions
| @@ -2058,8 +2058,8 @@ This option tells 'flash-face-bell-function' and | |||
| 2058 | for flash. | 2058 | for flash. |
| 2059 | 2059 | ||
| 2060 | +++ | 2060 | +++ |
| 2061 | *** 'face-all-attributes' now accepts an optional inherit argument. | 2061 | *** 'face-all-attributes' now accepts an optional argument INHERIT. |
| 2062 | 'inherit' has the same meaning as the same argument to 'face-attribute', | 2062 | It has the same meaning as the INHERIT argument to 'face-attribute', |
| 2063 | which already takes this argument for a single attribute. This is | 2063 | which already takes this argument for a single attribute. This is |
| 2064 | useful when you want the face attributes to be absolute and not | 2064 | useful when you want the face attributes to be absolute and not |
| 2065 | 'unspecified'. | 2065 | 'unspecified'. |
diff --git a/lisp/faces.el b/lisp/faces.el index 3b48c243587..cf81013118b 100644 --- a/lisp/faces.el +++ b/lisp/faces.el | |||
| @@ -444,11 +444,11 @@ If `inhibit-x-resources' is non-nil, this function does nothing." | |||
| 444 | 444 | ||
| 445 | (defun face-all-attributes (face &optional frame inherit) | 445 | (defun face-all-attributes (face &optional frame inherit) |
| 446 | "Return an alist stating the attributes of FACE. | 446 | "Return an alist stating the attributes of FACE. |
| 447 | Each element of the result has the form (ATTR-NAME . ATTR-VALUE). If | 447 | Each element of the result has the form (ATTR-NAME . ATTR-VALUE). |
| 448 | FRAME is omitted or nil the value describes the default attributes, but | 448 | If FRAME is omitted or nil the value describes the default attributes, |
| 449 | if you specify FRAME, the value describes the attributes of FACE on | 449 | but if you specify FRAME, the value describes the attributes of FACE |
| 450 | FRAME. INHERIT has the same meaning as the same argument to | 450 | on FRAME. |
| 451 | `face-attribute', which see." | 451 | INHERIT has the same meaning as in `face-attribute', which see." |
| 452 | (mapcar (lambda (pair) | 452 | (mapcar (lambda (pair) |
| 453 | (let ((attr (car pair))) | 453 | (let ((attr (car pair))) |
| 454 | (cons attr (face-attribute face attr (or frame t) inherit)))) | 454 | (cons attr (face-attribute face attr (or frame t) inherit)))) |