From: Karl Heuer Date: Tue, 20 Jul 1999 01:46:01 +0000 (+0000) Subject: (ansi-term-fg-faces-vector): Added support for ANSI X-Git-Tag: emacs-pretest-21.0.90~7475 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9b80213097501f0fc0dd1fa65af403e0492f7660;p=emacs.git (ansi-term-fg-faces-vector): Added support for ANSI color codes 39 and 49, which by the way lynx uses them seem to mean "foreground reset" and "background reset". --- diff --git a/lisp/term.el b/lisp/term.el index 262686cf9f2..e8e584d2152 100644 --- a/lisp/term.el +++ b/lisp/term.el @@ -3040,12 +3040,22 @@ See `term-prompt-regexp'." ((eq parameter 8) (setq term-ansi-current-invisible 1)) +;;; Foreground ((and (>= parameter 30) (<= parameter 37)) (setq term-ansi-current-color (- parameter 29))) +;;; Reset foreground + ((eq parameter 39) + (setq term-ansi-current-color 0)) + +;;; Background ((and (>= parameter 40) (<= parameter 47)) (setq term-ansi-current-bg-color (- parameter 39))) +;;; Reset background + ((eq parameter 49) + (setq term-ansi-current-bg-color 0)) + ;;; 0 (Reset) or unknown (reset anyway) (t (setq term-current-face