aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/faces.el13
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/faces.el b/lisp/faces.el
index 1f9b3974c72..9a8a1344caf 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1667,7 +1667,7 @@ is given, in which case return its value instead."
1667 face--attributes-unspecified))) 1667 face--attributes-unspecified)))
1668 1668
1669(defun face-spec-set (face spec &optional spec-type) 1669(defun face-spec-set (face spec &optional spec-type)
1670 "Set the face spec SPEC for FACE. 1670 "Set the FACE's spec SPEC, define FACE, and recalculate its attributes.
1671See `defface' for the format of SPEC. 1671See `defface' for the format of SPEC.
1672 1672
1673The appearance of each face is controlled by its specs (set via 1673The appearance of each face is controlled by its specs (set via
@@ -1678,10 +1678,11 @@ This function also defines FACE as a valid face name if it is not
1678already one, and (re)calculates its attributes on existing 1678already one, and (re)calculates its attributes on existing
1679frames. 1679frames.
1680 1680
1681The argument SPEC-TYPE determines which spec to set: 1681The optional argument SPEC-TYPE determines which spec to set:
1682 nil or `face-override-spec' means the override spec (which is 1682 nil, omitted or `face-override-spec' means the override spec,
1683 usually what you want if calling this function outside of 1683 which overrides all the other types of spec mentioned below
1684 Custom code); 1684 (this is usually what you want if calling this function
1685 outside of Custom code);
1685 `customized-face' or `saved-face' means the customized spec or 1686 `customized-face' or `saved-face' means the customized spec or
1686 the saved custom spec; 1687 the saved custom spec;
1687 `face-defface-spec' means the default spec 1688 `face-defface-spec' means the default spec
@@ -1689,7 +1690,7 @@ The argument SPEC-TYPE determines which spec to set:
1689 `reset' means to ignore SPEC, but clear the `customized-face' 1690 `reset' means to ignore SPEC, but clear the `customized-face'
1690 and `face-override-spec' specs; 1691 and `face-override-spec' specs;
1691Any other value means not to set any spec, but to run the 1692Any other value means not to set any spec, but to run the
1692function for its other effects." 1693function for defining FACE and recalculating its attributes."
1693 (if (get face 'face-alias) 1694 (if (get face 'face-alias)
1694 (setq face (get face 'face-alias))) 1695 (setq face (get face 'face-alias)))
1695 ;; Save SPEC to the relevant symbol property. 1696 ;; Save SPEC to the relevant symbol property.