Mercurial > emacs

changeset 17950:4ef122a60b5a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(x-create-frame-with-faces): Don't call frame-set-background-mode until after handling the reverse-video parameter.
author Richard M. Stallman <rms@gnu.org>
date Mon, 26 May 1997 01:30:07 +0000
parents 3b0f71e1661d
children c13285663c82
files lisp/faces.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Sun May 25 22:01:44 1997 +0000
+++ b/lisp/faces.el	Mon May 26 01:30:07 1997 +0000
@@ -1206,7 +1206,6 @@
       (let* ((visibility-spec (assq 'visibility parameters))
 	     success faces rest)
 	(setq frame (x-create-frame (cons '(visibility . nil) parameters)))
-	(frame-set-background-mode frame)
 	(unwind-protect
 	    (progn
 
@@ -1247,6 +1246,8 @@
 			(modify-frame-parameters frame
 						 (list (cons 'cursor-color fg))))))
 
+	      (frame-set-background-mode frame)
+
 	      ;; Set up faces from the defface information
 	      (mapcar (lambda (symbol)
 			(let ((spec (or (get symbol 'saved-face)