* cus-edit.el (custom-modified-face):

* comint.el (comint-highlight-input): Fix previous changes.
* term.el (term-handle-ansi-escape): Add a comment.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4d94a867bbbbe44a5e407af985351c396ebdea6a..ad66fecaf36dbb7782cc71354303db31e356ee20 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -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

diff --git a/lisp/comint.el b/lisp/comint.el
index 520641aca8d306dfcc8089d1c53a88506948d3d5..5f038dcd3d99f3d525b356fc1417cf1d0cf8db66 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -228,7 +228,7 @@ This variable is buffer-local."
   :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."

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 5be34dd4adb9214a5a52f94fe1b77e0a2d727f7e..8d440be9b392a375019fc80b43840887becbc5cc 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -1646,7 +1646,7 @@ item in another window.\n\n"))
   "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"))

diff --git a/lisp/term.el b/lisp/term.el
index 02841db95028091577248599456645d72c2959e9..8643ea69fc0687a65e3ecd788024da12263b4e9f 100644 (file)
--- a/lisp/term.el
+++ b/lisp/term.el
@@ -3233,7 +3233,7 @@ See `term-prompt-regexp'."
    ((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)