Mercurial > hg > xemacs-beta

comparison lisp/faces.el @ 325:f2b5d7006b0a r21-0-60

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-0-60
author cvs
date Mon, 13 Aug 2007 10:47:35 +0200
parents 19dcec799385
children a4f53d9b3154
comparison
equal deleted inserted replaced
324:8f2460f6e1f6 325:f2b5d7006b0a
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))))