diff options
| author | YAMAMOTO Mitsuharu | 2005-10-21 08:26:37 +0000 |
|---|---|---|
| committer | YAMAMOTO Mitsuharu | 2005-10-21 08:26:37 +0000 |
| commit | 1505621c908eeaa166a7b4a19d0053a17c7f5d73 (patch) | |
| tree | e664a4257391b631142fc34c34fcf85c70d46636 | |
| parent | b71cef5c989dfe33f71afec7f183821e797e33df (diff) | |
| download | emacs-1505621c908eeaa166a7b4a19d0053a17c7f5d73.tar.gz emacs-1505621c908eeaa166a7b4a19d0053a17c7f5d73.zip | |
(custom-declare-face): Make face from X resources also on Mac.
| -rw-r--r-- | lisp/cus-face.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/cus-face.el b/lisp/cus-face.el index cd052732b65..8a6e77f9805 100644 --- a/lisp/cus-face.el +++ b/lisp/cus-face.el | |||
| @@ -47,7 +47,7 @@ | |||
| 47 | (dolist (frame (frame-list)) | 47 | (dolist (frame (frame-list)) |
| 48 | (face-spec-set face value frame))) | 48 | (face-spec-set face value frame))) |
| 49 | ;; When making a face after frames already exist | 49 | ;; When making a face after frames already exist |
| 50 | (if (memq window-system '(x w32)) | 50 | (if (memq window-system '(x w32 mac)) |
| 51 | (make-face-x-resource-internal face)))) | 51 | (make-face-x-resource-internal face)))) |
| 52 | ;; Don't record SPEC until we see it causes no errors. | 52 | ;; Don't record SPEC until we see it causes no errors. |
| 53 | (put face 'face-defface-spec spec) | 53 | (put face 'face-defface-spec spec) |