Commit 522fb950 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

(describe-face): "?\ " -> "?\s".

(read-all-face-attributes, read-face-font, modify-face, face-attr-construct,
italic): Fix typos in docstrings.
(frame-update-face-colors): Declare with `define-obsolete-function-alias'.
parent 4f5ab6d5
......@@ -385,7 +385,7 @@ completely specified)."
(defun face-attribute-merged-with (attribute value faces &optional frame)
"Merges ATTRIBUTE, initially VALUE, with faces from FACES until absolute.
FACES may be either a single face or a list of faces.
\[This is an internal function]"
\[This is an internal function.]"
(cond ((not (face-attribute-relative-p attribute value))
value)
((null faces)
......@@ -1095,7 +1095,7 @@ of a global face. Value is the new attribute value."
(defun read-face-font (face &optional frame)
"Read the name of a font for FACE on FRAME.
If optional argument FRAME Is nil or omitted, use the selected frame."
If optional argument FRAME is nil or omitted, use the selected frame."
(let ((completion-ignore-case t))
(completing-read (format "Set font attributes of face `%s' from font: " face)
(x-list-fonts "*" nil frame))))
......@@ -1103,7 +1103,7 @@ If optional argument FRAME Is nil or omitted, use the selected frame."
(defun read-all-face-attributes (face &optional frame)
"Interactively read all attributes for FACE.
If optional argument FRAME Is nil or omitted, use the selected frame.
If optional argument FRAME is nil or omitted, use the selected frame.
Value is a property list of attribute names and new values."
(let (result)
(dolist (attribute face-attribute-name-alist result)
......@@ -1117,7 +1117,7 @@ Value is a property list of attribute names and new values."
If optional argument FRAME is nil or omitted, modify the face used
for newly created frame, i.e. the global face.
For non-interactive use, `set-face-attribute' is preferred.
When called from elisp, if FACE is nil, all arguments but FRAME are ignored
When called from Lisp, if FACE is nil, all arguments but FRAME are ignored
and the face and its settings are obtained by querying the user."
(interactive)
(if face
......@@ -1316,7 +1316,7 @@ If FRAME is omitted or nil, use the selected frame."
(terpri))
(dolist (a attrs)
(let ((attr (face-attribute f (car a) frame)))
(insert (make-string (- max-width (length (cdr a))) ?\ )
(insert (make-string (- max-width (length (cdr a))) ?\s)
(cdr a) ": " (format "%s" attr) "\n")))))
(terpri)))
(print-help-return-message))))
......@@ -1330,7 +1330,7 @@ If FRAME is omitted or nil, use the selected frame."
;; face implementation.
(defun face-attr-construct (face &optional frame)
"Return a defface-style attribute list for FACE on FRAME.
"Return a `defface'-style attribute list for FACE on FRAME.
Value is a property list of pairs ATTRIBUTE VALUE for all specified
face attributes of FACE where ATTRIBUTE is the attribute name and
VALUE is the specified value of that attribute."
......@@ -1835,8 +1835,8 @@ created."
;; Update the colors of FACE, after FRAME's own colors have been
;; changed.
(defalias 'frame-update-face-colors 'frame-set-background-mode)
(make-obsolete 'frame-update-face-colors 'frame-set-background-mode "21.1")
(define-obsolete-function-alias 'frame-update-face-colors
'frame-set-background-mode "21.1")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
......@@ -2055,7 +2055,7 @@ Note: Other faces cannot inherit from the cursor face."
;; because in some cases the display engine will do it's own
;; workaround (to `dim' on ttys)
:slant italic))
"Basic italic font."
"Basic italic face."
:group 'basic-faces)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment