Mercurial > emacs
changeset 61396:a2c0a72230cf
* cus-edit.el (custom-modified-face):
* comint.el (comint-highlight-input): Fix previous changes.
* term.el (term-handle-ansi-escape): Add a comment.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Fri, 08 Apr 2005 20:55:09 +0000 |
| parents | 21f8452c722e |
| children | cf9ed6277047 |
| files | lisp/ChangeLog lisp/comint.el lisp/cus-edit.el lisp/term.el |
| diffstat | 4 files changed, 9 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Fri Apr 08 14:40:57 2005 +0000 +++ b/lisp/ChangeLog Fri Apr 08 20:55:09 2005 +0000 @@ -1,3 +1,9 @@ +2005-04-08 Dan Nicolaescu <dann@ics.uci.edu> + + * cus-edit.el (custom-modified-face): + * comint.el (comint-highlight-input): Fix previous changes. + * term.el (term-handle-ansi-escape): Add a comment. + 2005-04-08 Stefan Monnier <monnier@iro.umontreal.ca> * whitespace.el (whitespace-highlight-the-space): Put the same overlay
--- a/lisp/comint.el Fri Apr 08 14:40:57 2005 +0000 +++ b/lisp/comint.el Fri Apr 08 20:55:09 2005 +0000 @@ -228,7 +228,7 @@ :group 'comint) (defface comint-highlight-prompt - '(((min-colors 88) ((background dark)) (:foreground "cyan1")) + '((((min-colors 88) ((background dark))) (:foreground "cyan1")) (((background dark)) (:foreground "cyan")) (t (:foreground "dark blue"))) "Face to use to highlight prompts."
--- a/lisp/cus-edit.el Fri Apr 08 14:40:57 2005 +0000 +++ b/lisp/cus-edit.el Fri Apr 08 20:55:09 2005 +0000 @@ -1646,7 +1646,7 @@ "Face used when the customize item is not defined for customization." :group 'custom-magic-faces) -(defface custom-modified-face '(((min-colors 88) ((class color)) +(defface custom-modified-face '((((min-colors 88) (class color)) (:foreground "white" :background "blue1")) (((class color)) (:foreground "white" :background "blue"))
--- a/lisp/term.el Fri Apr 08 14:40:57 2005 +0000 +++ b/lisp/term.el Fri Apr 08 20:55:09 2005 +0000 @@ -3233,7 +3233,7 @@ ((eq char ?P) (term-delete-chars (max 1 term-terminal-parameter))) ;; \E[@ - insert spaces - ((eq char ?@) + ((eq char ?@) ;; (terminfo: ich) (term-insert-spaces (max 1 term-terminal-parameter))) ;; \E[?h - DEC Private Mode Set ((eq char ?h)