eshell ansi-color hook

2 files changed, 14 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index fe5b283ab53..36f0d35eb5f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-03-16  Mark A. Hershberger  <mah@everybody.org>
+
+        * eshell/esh-mode.el (eshell-handle-ansi-color): New function.
+        Add new option for eshell-output-filter-functions.
+
 2007-03-11  Juri Linkov <juri@jurta.org>
 
         * replace.el (match): Use yellow background on light-bg terminals.
diff --git a/lisp/eshell/esh-mode.el b/lisp/eshell/esh-mode.el
index c185e88d8a8..c6abda631dc 100644
--- a/lisp/eshell/esh-mode.el
+++ b/lisp/eshell/esh-mode.el
@@ -1078,6 +1078,15 @@ This function could be in the list `eshell-output-filter-functions'."
 (custom-add-option 'eshell-output-filter-functions
                    'eshell-handle-control-codes)
 
+(defun eshell-handle-ansi-color ()
+  "Handle ANSI color codes."
+  (require 'ansi-color)
+  (ansi-color-apply-on-region eshell-last-output-start
+                              eshell-last-output-end))
+
+(custom-add-option 'eshell-output-filter-functions
+                   'eshell-handle-ansi-color)
+
 ;;; Code:
 
 ;;; arch-tag: ec65bc2b-da14-4547-81d3-a32af3a4dc57