mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-28 10:56:36 +00:00
Code Issues Releases Activity

(term-default-fg-color, term-default-bg-color)

Browse Source 
(ansi-term-color-vector): Use `unspecified', not nil, as default.
This commit is contained in:
Richard M. Stallman 2004-08-16 22:41:56 +00:00
parent 9a69579e35
commit 3598531837
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/term.el
View File

@ -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))