Mercurial > emacs

diff lisp/cus-face.el @ 84373:ac2caa9660e7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
2007-09-07 Johan Bockg? <bojohan@gnu.org> * cus-face.el (custom-theme-set-faces): Set face attributes locally for each frame.
author Romain Francoise <romain@orebokech.com>
date Fri, 07 Sep 2007 16:50:02 +0000
parents 65663fcd2caa
children f8c971a5c815
line wrap: on
line diff
--- a/lisp/cus-face.el	Fri Sep 07 15:07:13 2007 +0000
+++ b/lisp/cus-face.el	Fri Sep 07 16:50:02 2007 +0000
@@ -342,7 +342,8 @@
 		(unless (facep face)
 		  (make-empty-face face))
 		(put face 'face-comment comment)
-		(face-spec-set face spec))
+		(dolist (frame (frame-list))
+		  (face-spec-set face spec frame)))
 	    (setq args (cdr args)))
 	;; Old format, a plist of FACE SPEC pairs.
 	(let ((face (nth 0 args))