Mercurial > emacs
changeset 84373:ac2caa9660e7
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 | 536831328305 |
| children | 1224dec49333 |
| files | lisp/ChangeLog lisp/cus-face.el |
| diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Sep 07 15:07:13 2007 +0000 +++ b/lisp/ChangeLog Fri Sep 07 16:50:02 2007 +0000 @@ -1,3 +1,8 @@ +2007-09-07 Johan Bockg,Ae(Brd <bojohan@gnu.org> + + * cus-face.el (custom-theme-set-faces): Set face attributes + locally for each frame. + 2007-09-07 Stefan Monnier <monnier@iro.umontreal.ca> * progmodes/fortran.el (fortran-mode): Set font-lock-syntactic-keywords
--- 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))