changeset 51248:e21b4eb91135

(x-create-frame-with-faces): Call `face-set-after-frame-default'. (display-supports-face-attributes-p): Doc fix.
author John Paul Wallington <jpw@pobox.com>
date Mon, 26 May 2003 19:15:42 +0000
parents bae989c94b95
children e57c833c7053
files lisp/faces.el
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Mon May 26 18:02:24 2003 +0000
+++ b/lisp/faces.el	Mon May 26 19:15:42 2003 +0000
@@ -1489,10 +1489,10 @@
  (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 @@
 	(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)))