emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/zig-mode dbc648f5bc 2/2: Use builtin `ansi-color-compilati


From: ELPA Syncer
Subject: [nongnu] elpa/zig-mode dbc648f5bc 2/2: Use builtin `ansi-color-compilation-filter` on Emacs >= 28
Date: Sat, 21 May 2022 07:58:48 -0400 (EDT)

branch: elpa/zig-mode
commit dbc648f5bca8f3b9ca2cc7827f326f5530115144
Author: Erik Arvstedt <erik.arvstedt@gmail.com>
Commit: Joachim Schmidt <joachim.schmidt557@outlook.com>

    Use builtin `ansi-color-compilation-filter` on Emacs >= 28
---
 zig-mode.el | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/zig-mode.el b/zig-mode.el
index 4fe1e65768..be3a0ee069 100644
--- a/zig-mode.el
+++ b/zig-mode.el
@@ -551,13 +551,15 @@ This is written mainly to be used as 
`end-of-defun-function' for Zig."
   (when zig-format-on-save
        (zig-format-buffer)))
 
-(defun colorize-compilation-buffer ()
-  (let ((inhibit-read-only t))
-    (ansi-color-apply-on-region compilation-filter-start (point))))
-
 ;;;###autoload
 (add-to-list 'auto-mode-alist '("\\.zig\\'" . zig-mode))
-(add-hook 'compilation-filter-hook 'colorize-compilation-buffer)
+(if (>= emacs-major-version 28)
+    (add-hook 'compilation-filter-hook 'ansi-color-compilation-filter)
+  (progn
+    (defun colorize-compilation-buffer ()
+      (let ((inhibit-read-only t))
+        (ansi-color-apply-on-region compilation-filter-start (point))))
+    (add-hook 'compilation-filter-hook 'colorize-compilation-buffer)))
 
 (provide 'zig-mode)
 ;;; zig-mode.el ends here



reply via email to

[Prev in Thread] Current Thread [Next in Thread]