emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/term.el [emacs-unicode-2]


From: Miles Bader
Subject: [Emacs-diffs] Changes to emacs/lisp/term.el [emacs-unicode-2]
Date: Fri, 27 Aug 2004 03:25:05 -0400

Index: emacs/lisp/term.el
diff -c emacs/lisp/term.el:1.49.6.2 emacs/lisp/term.el:1.49.6.3
*** emacs/lisp/term.el:1.49.6.2 Fri Apr 16 12:50:10 2004
--- emacs/lisp/term.el  Fri Aug 27 07:00:26 2004
***************
*** 705,722 ****
  
  ;;; faces -mm
  
! (defcustom term-default-fg-color nil
    "Default color for foreground in `term'."
    :group 'term
    :type 'string)
  
! (defcustom term-default-bg-color nil
    "Default color for background in `term'."
    :group 'term
    :type 'string)
  
  (defvar ansi-term-color-vector
!   [nil "black" "red" "green" "yellow" "blue"
     "magenta" "cyan" "white"])
  
  ;;; Inspiration came from comint.el -mm
--- 705,722 ----
  
  ;;; faces -mm
  
! (defcustom term-default-fg-color 'unspecified
    "Default color for foreground in `term'."
    :group 'term
    :type 'string)
  
! (defcustom term-default-bg-color 'unspecified
    "Default color for background in `term'."
    :group 'term
    :type 'string)
  
  (defvar ansi-term-color-vector
!   [unspecified "black" "red" "green" "yellow" "blue"
     "magenta" "cyan" "white"])
  
  ;;; Inspiration came from comint.el -mm
***************
*** 3078,3085 ****
              (setq term-current-face
                    (append '(:underline t) term-current-face))))))
  
! ;     (message "Debug %S" term-current-face)
! 
    (setq term-ansi-face-already-done 0))
  
  
--- 3078,3084 ----
              (setq term-current-face
                    (append '(:underline t) term-current-face))))))
  
! ;;;   (message "Debug %S" term-current-face)
    (setq term-ansi-face-already-done 0))
  
  




reply via email to

[Prev in Thread] Current Thread [Next in Thread]