Emacs: Allow my/apply-ansi-colors-on-buffer in read-only buffers.

This commit is contained in:
tastytea 2020-10-14 00:20:58 +02:00
parent e6a6bd812c
commit c3ab734767
1 changed files with 3 additions and 2 deletions

View File

@ -1,6 +1,6 @@
;;; misc.el --- Miscellaneous file formats. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-10-14T00:01:20+0200>
;; Time-stamp: <2020-10-14T00:08:06+0200>
;;; Commentary:
@ -197,7 +197,8 @@
(defun my/apply-ansi-colors-on-buffer ()
"Apply ANSI colors in the current buffer."
(interactive)
(ansi-color-apply-on-region (point-min) (point-max)))
(let ((inhibit-read-only t))
(ansi-color-apply-on-region (point-min) (point-max))))
(defun my/apply-ansi-colors-compilation ()
"Apply ANSI colors in the compilation window."
(let ((inhibit-read-only t))