diff options
| author | Mark A. Hershberger | 2007-03-16 16:53:06 +0000 |
|---|---|---|
| committer | Mark A. Hershberger | 2007-03-16 16:53:06 +0000 |
| commit | 1c979bff35bb7603245ffbd8aaf19be097dc2bdd (patch) | |
| tree | 5d90a4228553e79d98340f13b542a4831f974acb /lisp/eshell | |
| parent | 330167fce8f6eca3098a2b4d74706395963979b1 (diff) | |
| download | emacs-1c979bff35bb7603245ffbd8aaf19be097dc2bdd.tar.gz emacs-1c979bff35bb7603245ffbd8aaf19be097dc2bdd.zip | |
eshell ansi-color hook
Diffstat (limited to 'lisp/eshell')
| -rw-r--r-- | lisp/eshell/esh-mode.el | 9 |
1 files changed, 9 insertions, 0 deletions
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'." | |||
| 1078 | (custom-add-option 'eshell-output-filter-functions | 1078 | (custom-add-option 'eshell-output-filter-functions |
| 1079 | 'eshell-handle-control-codes) | 1079 | 'eshell-handle-control-codes) |
| 1080 | 1080 | ||
| 1081 | (defun eshell-handle-ansi-color () | ||
| 1082 | "Handle ANSI color codes." | ||
| 1083 | (require 'ansi-color) | ||
| 1084 | (ansi-color-apply-on-region eshell-last-output-start | ||
| 1085 | eshell-last-output-end)) | ||
| 1086 | |||
| 1087 | (custom-add-option 'eshell-output-filter-functions | ||
| 1088 | 'eshell-handle-ansi-color) | ||
| 1089 | |||
| 1081 | ;;; Code: | 1090 | ;;; Code: |
| 1082 | 1091 | ||
| 1083 | ;;; arch-tag: ec65bc2b-da14-4547-81d3-a32af3a4dc57 | 1092 | ;;; arch-tag: ec65bc2b-da14-4547-81d3-a32af3a4dc57 |