Mercurial > emacs
changeset 19257:e487ed925a50
(custom-declare-face): Call make-face-x-resource-internal.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 09 Aug 1997 20:09:16 +0000 |
| parents | e4b14e6fd28f |
| children | cf4b06e6a5ab |
| files | lisp/cus-face.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/cus-face.el Sat Aug 09 19:11:15 1997 +0000 +++ b/lisp/cus-face.el Sat Aug 09 20:09:16 1997 +0000 @@ -53,7 +53,10 @@ (while frames (setq frame (car frames) frames (cdr frames)) - (face-spec-set face value frame))))) + (face-spec-set face value frame))) + ;; When making a face after frames already exist + (if (memq window-system '(x w32)) + (make-face-x-resource-internal face)))) (when (and doc (null (face-documentation face))) (set-face-documentation face doc)) (custom-handle-all-keywords face args 'custom-face)