From 35985318379a1fe30f91fb797757ea722f402b3e Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 16 Aug 2004 22:41:56 +0000 Subject: [PATCH] (term-default-fg-color, term-default-bg-color) (ansi-term-color-vector): Use `unspecified', not nil, as default. --- lisp/term.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/lisp/term.el b/lisp/term.el index f1bd8d9a4f6..9866db7e29c 100644 --- a/lisp/term.el +++ b/lisp/term.el @@ -705,18 +705,18 @@ Buffer local variable.") ;;; faces -mm -(defcustom term-default-fg-color nil +(defcustom term-default-fg-color 'unspecified "Default color for foreground in `term'." :group 'term :type 'string) -(defcustom term-default-bg-color nil +(defcustom term-default-bg-color 'unspecified "Default color for background in `term'." :group 'term :type 'string) (defvar ansi-term-color-vector - [nil "black" "red" "green" "yellow" "blue" + [unspecified "black" "red" "green" "yellow" "blue" "magenta" "cyan" "white"]) ;;; Inspiration came from comint.el -mm @@ -3080,8 +3080,7 @@ See `term-prompt-regexp'." (setq term-current-face (append '(:underline t) term-current-face)))))) -; (message "Debug %S" term-current-face) - +;;; (message "Debug %S" term-current-face) (setq term-ansi-face-already-done 0)) -- 2.39.2