diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/faces.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index 522446add15..21de277cbce 100644 --- a/lisp/faces.el +++ b/lisp/faces.el | |||
| @@ -338,7 +338,7 @@ specifies an invalid attribute." | |||
| 338 | 338 | ||
| 339 | (defun set-face-attributes-from-resources (face frame) | 339 | (defun set-face-attributes-from-resources (face frame) |
| 340 | "Set attributes of FACE from X resources for FRAME." | 340 | "Set attributes of FACE from X resources for FRAME." |
| 341 | (when (memq (framep frame) '(x w32 ns)) | 341 | (when (memq (framep frame) '(x w32)) |
| 342 | (dolist (definition face-x-resources) | 342 | (dolist (definition face-x-resources) |
| 343 | (let ((attribute (car definition))) | 343 | (let ((attribute (car definition))) |
| 344 | (dolist (entry (cdr definition)) | 344 | (dolist (entry (cdr definition)) |
| @@ -2020,7 +2020,7 @@ frame parameters in PARAMETERS and `default-frame-alist'." | |||
| 2020 | ;; X resouces for the default face are applied during | 2020 | ;; X resouces for the default face are applied during |
| 2021 | ;; x-create-frame. | 2021 | ;; x-create-frame. |
| 2022 | (and (not (eq face 'default)) | 2022 | (and (not (eq face 'default)) |
| 2023 | (memq (window-system frame) '(x w32 ns)) | 2023 | (memq (window-system frame) '(x w32)) |
| 2024 | (make-face-x-resource-internal face frame)) | 2024 | (make-face-x-resource-internal face frame)) |
| 2025 | ;; Apply attributes specified by face-new-frame-defaults | 2025 | ;; Apply attributes specified by face-new-frame-defaults |
| 2026 | (internal-merge-in-global-face face frame)) | 2026 | (internal-merge-in-global-face face frame)) |