Mercurial > hg > xemacs-beta
comparison lisp/faces.el @ 382:064ab7fed2e0 r21-2-6
Import from CVS: tag r21-2-6
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:07:39 +0200 |
parents | d883f39b8495 |
children | 74fd4e045ea6 |
comparison
equal
deleted
inserted
replaced
381:908a86f940e6 | 382:064ab7fed2e0 |
---|---|
1207 (reset-face face frame) | 1207 (reset-face face frame) |
1208 (face-display-set face spec frame) | 1208 (face-display-set face spec frame) |
1209 (init-face-from-resources face frame)) | 1209 (init-face-from-resources face frame)) |
1210 (let ((frames (relevant-custom-frames))) | 1210 (let ((frames (relevant-custom-frames))) |
1211 (reset-face face) | 1211 (reset-face face) |
1212 (if (and (eq 'default face) (featurep 'x)) | |
1213 (x-init-global-faces)) | |
1212 (face-display-set face spec) | 1214 (face-display-set face spec) |
1213 (while frames | 1215 (while frames |
1214 (face-display-set face spec (car frames)) | 1216 (face-display-set face spec (car frames)) |
1215 (pop frames)) | 1217 (pop frames)) |
1216 (init-face-from-resources face)))) | 1218 (init-face-from-resources face)))) |