diff options
| author | Richard M. Stallman | 1997-08-24 20:40:48 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-08-24 20:40:48 +0000 |
| commit | 573d18cb3d48005e617d2b1bccbb359b93150d09 (patch) | |
| tree | 6b0b088c04848856775328f3b03258b5e5f99301 | |
| parent | b438e1cb6c6545d4ddab94df68e0920572c7d831 (diff) | |
| download | emacs-573d18cb3d48005e617d2b1bccbb359b93150d09.tar.gz emacs-573d18cb3d48005e617d2b1bccbb359b93150d09.zip | |
(modify-face): Fix previous change.
| -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 e91f7844953..9491b333da9 100644 --- a/lisp/faces.el +++ b/lisp/faces.el | |||
| @@ -357,7 +357,7 @@ If called interactively, prompts for a face name and face attributes." | |||
| 357 | ;; Clear this before we install the new foreground and background; | 357 | ;; Clear this before we install the new foreground and background; |
| 358 | ;; otherwise, clearing it after would swap them! | 358 | ;; otherwise, clearing it after would swap them! |
| 359 | (when (and (or foreground background) (face-inverse-video-p face)) | 359 | (when (and (or foreground background) (face-inverse-video-p face)) |
| 360 | (set-face-inverse-video-p face frame nil) | 360 | (set-face-inverse-video-p face nil frame) |
| 361 | ;; Arrange to restore it after, if we are not setting it now. | 361 | ;; Arrange to restore it after, if we are not setting it now. |
| 362 | (or (memq inverse-p '(t nil)) | 362 | (or (memq inverse-p '(t nil)) |
| 363 | (setq inverse-p t))) | 363 | (setq inverse-p t))) |