Mercurial > emacs
changeset 30974:dd71356a722a
(command-line): Clear realized faces after
modifying TTY color mappings.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Sun, 20 Aug 2000 13:26:35 +0000 |
| parents | 2f3dc355bcaf |
| children | c007b25bad3d |
| files | lisp/startup.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/startup.el Sun Aug 20 13:23:01 2000 +0000 +++ b/lisp/startup.el Sun Aug 20 13:26:35 2000 +0000 @@ -787,7 +787,10 @@ (color (car colors))) (while colors (tty-color-define (car color) (cadr color) (cddr color)) - (setq colors (cdr colors) color (car colors))))) + (setq colors (cdr colors) color (car colors))) + ;; Modifying color mappings means realized faces don't + ;; use the right colors, so clear them. + (clear-face-cache))) ;; Load library for our terminal type. ;; User init file can set term-file-prefix to nil to prevent this.