(x-create-frame-with-faces): Call `face-set-after-frame-default'.

(display-supports-face-attributes-p): Doc fix.

diff --git a/lisp/faces.el b/lisp/faces.el
index 695aaf31a6167af7a5329958df211718640f70ee..ee3a9d78cb48a752419e128575676401440a7cda 100644 (file)
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -1489,10 +1489,10 @@ with the default face for display, can be represented in a way that's
  (1) different in appearance than the default face, and
  (2) `close in spirit' to what the attributes specify, if not exact.
 
-Point (2) implies that a `:weight black' attribute will be satisified by
+Point (2) implies that a `:weight black' attribute will be satisfied by
 any display that can display bold, and a `:foreground \"yellow\"' as long
 as it can display a yellowish color, but `:slant italic' will _not_ be
-satisified by the tty display code's automatic substitution of a `dim'
+satisfied by the tty display code's automatic substitution of a `dim'
 face for italic."
   (let ((frame
         (if (framep display)
@@ -1657,8 +1657,7 @@ Value is the new frame created."
        (progn
          (x-handle-reverse-video frame parameters)
          (frame-set-background-mode frame)
-         ;; No need to call `face-set-after-frame-default'
-         ;; since x-create-frame does that.
+         (face-set-after-frame-default frame)
          (if (or (null frame-list) (null visibility-spec))
              (make-frame-visible frame)
            (modify-frame-parameters frame (list visibility-spec)))