# HG changeset patch
# User YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
# Date 1129883197 0
# Node ID 03fbd1b84b2ff076a19dbfc51af781c2b035d075
# Parent  79d2a5d86ee4bc18ec1d1d1bc0f2ccdcb2a39c88
(custom-declare-face): Make face from X resources also on Mac.

diff -r 79d2a5d86ee4 -r 03fbd1b84b2f lisp/cus-face.el
--- a/lisp/cus-face.el	Fri Oct 21 07:56:50 2005 +0000
+++ b/lisp/cus-face.el	Fri Oct 21 08:26:37 2005 +0000
@@ -47,7 +47,7 @@
 	  (dolist (frame (frame-list))
 	    (face-spec-set face value frame)))
 	;; When making a face after frames already exist
-	(if (memq window-system '(x w32))
+	(if (memq window-system '(x w32 mac))
 	    (make-face-x-resource-internal face))))
     ;; Don't record SPEC until we see it causes no errors.
     (put face 'face-defface-spec spec)