; Fix last change (bug#77945)

* lisp/faces.el (face-all-attributes):
* etc/NEWS: Reformat and fix wording in documentation.
This commit is contained in:
Eli Zaretskii 2025-06-07 12:43:39 +03:00
parent 13fa74b73c
commit 0bc2a5a2c1
2 changed files with 7 additions and 7 deletions

View file

@ -2058,8 +2058,8 @@ This option tells 'flash-face-bell-function' and
for flash.
+++
*** 'face-all-attributes' now accepts an optional inherit argument.
'inherit' has the same meaning as the same argument to 'face-attribute',
*** 'face-all-attributes' now accepts an optional argument INHERIT.
It has the same meaning as the INHERIT argument to 'face-attribute',
which already takes this argument for a single attribute. This is
useful when you want the face attributes to be absolute and not
'unspecified'.

View file

@ -444,11 +444,11 @@ If `inhibit-x-resources' is non-nil, this function does nothing."
(defun face-all-attributes (face &optional frame inherit)
"Return an alist stating the attributes of FACE.
Each element of the result has the form (ATTR-NAME . ATTR-VALUE). If
FRAME is omitted or nil the value describes the default attributes, but
if you specify FRAME, the value describes the attributes of FACE on
FRAME. INHERIT has the same meaning as the same argument to
`face-attribute', which see."
Each element of the result has the form (ATTR-NAME . ATTR-VALUE).
If FRAME is omitted or nil the value describes the default attributes,
but if you specify FRAME, the value describes the attributes of FACE
on FRAME.
INHERIT has the same meaning as in `face-attribute', which see."
(mapcar (lambda (pair)
(let ((attr (car pair)))
(cons attr (face-attribute face attr (or frame t) inherit))))