Declare function in esh-mode before #'-ing it
* lisp/eshell/esh-mode.el (ansi-color-apply-text-property-face): Declare to avoid a compilation warning.
This commit is contained in:
parent
bba5cc96aa
commit
e6404927e3
1 changed files with 3 additions and 0 deletions
|
@ -1015,9 +1015,12 @@ This function could be in the list `eshell-output-filter-functions'."
|
|||
|
||||
(autoload 'ansi-color-apply-on-region "ansi-color")
|
||||
(defvar ansi-color-apply-face-function)
|
||||
(declare-function ansi-color-apply-text-property-face "ansi-color"
|
||||
(BEG END FACE))
|
||||
|
||||
(defun eshell-handle-ansi-color ()
|
||||
"Handle ANSI color codes."
|
||||
(require 'ansi-color)
|
||||
(let ((ansi-color-apply-face-function #'ansi-color-apply-text-property-face))
|
||||
(ansi-color-apply-on-region eshell-last-output-start
|
||||
eshell-last-output-end)))
|
||||
|
|
Loading…
Add table
Reference in a new issue