diff options
| author | Richard M. Stallman | 1995-07-30 10:10:35 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-07-30 10:10:35 +0000 |
| commit | 21ef90eecf200cdb75d4d4ab9e8502db10b825ca (patch) | |
| tree | ca1f9bd7539033ef048f0907ae21e7b63e850549 | |
| parent | 4209f4792123e8e44e9aba12fc080432b89bb9f4 (diff) | |
| download | emacs-21ef90eecf200cdb75d4d4ab9e8502db10b825ca.tar.gz emacs-21ef90eecf200cdb75d4d4ab9e8502db10b825ca.zip | |
(set-face-background): Don't treat nil as a color.
| -rw-r--r-- | lisp/faces.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/faces.el b/lisp/faces.el index bf9c3302284..438b148f46d 100644 --- a/lisp/faces.el +++ b/lisp/faces.el | |||
| @@ -149,7 +149,7 @@ in that frame; otherwise change each frame." | |||
| 149 | (interactive (internal-face-interactive "background")) | 149 | (interactive (internal-face-interactive "background")) |
| 150 | ;; For a specific frame, use gray stipple instead of gray color | 150 | ;; For a specific frame, use gray stipple instead of gray color |
| 151 | ;; if the display does not support a gray color. | 151 | ;; if the display does not support a gray color. |
| 152 | (if (and frame (not (eq frame t)) | 152 | (if (and frame (not (eq frame t)) color |
| 153 | (not (face-color-supported-p frame color t))) | 153 | (not (face-color-supported-p frame color t))) |
| 154 | (set-face-stipple face face-default-stipple frame) | 154 | (set-face-stipple face face-default-stipple frame) |
| 155 | (if (null frame) | 155 | (if (null frame) |