emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

refactor(lib): remove doom-apply-ansi-color-to-compilation-buffer-h

Browse source 
Is redundant with ansi-color-compilation-filter.

Ref: aec4fbe590
This commit is contained in:
Henrik Lissner 2022-06-17 15:27:10 +02:00
parent d67dcf1940
commit 2f7171bf8a
No known key found for this signature in database
GPG key ID: B60957CA074D39A3
2 changed files with 2 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

7
core/autoload/ui.el
View file

@ -55,13 +55,6 @@ In tty Emacs, messages are suppressed completely."
;; ;;
;;; Hooks ;;; Hooks
;;;###autoload
(defun doom-apply-ansi-color-to-compilation-buffer-h ()
"Applies ansi codes to the compilation buffers. Meant for
`compilation-filter-hook'."
(with-silent-modifications
(ansi-color-apply-on-region compilation-filter-start (point))))
;;;###autoload ;;;###autoload
(defun doom-disable-show-paren-mode-h () (defun doom-disable-show-paren-mode-h ()
"Turn off `show-paren-mode' buffer-locally." "Turn off `show-paren-mode' buffer-locally."

4
core/core-ui.el
View file

@ -333,8 +333,8 @@ windows, switch to `doom-fallback-buffer'. Otherwise, delegate to original
(setq compilation-always-kill t ; kill compilation process before starting another (setq compilation-always-kill t ; kill compilation process before starting another
compilation-ask-about-save nil ; save all buffers on `compile' compilation-ask-about-save nil ; save all buffers on `compile'
compilation-scroll-output 'first-error) compilation-scroll-output 'first-error)
;; Handle ansi codes in compilation buffer ;; Handle ansi codes in compilation buffers
(add-hook 'compilation-filter-hook #'doom-apply-ansi-color-to-compilation-buffer-h) (add-hook 'compilation-filter-hook #'ansi-color-compilation-filter)
;; Automatically truncate compilation buffers so they don't accumulate too ;; Automatically truncate compilation buffers so they don't accumulate too
;; much data and bog down the rest of Emacs. ;; much data and bog down the rest of Emacs.
(autoload 'comint-truncate-buffer "comint" nil t) (autoload 'comint-truncate-buffer "comint" nil t)