From f1fa35f0914f5de6d0dbfde9cd00cc7ab1b20ebd Mon Sep 17 00:00:00 2001
From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 22 Feb 2021 16:47:38 +0100
Subject: Fix ANSI coloring problem in large outputs in eshell
* lisp/ansi-color.el (ansi-color-apply-on-region): Ensure that we
fontize from where we left off, and don't skip to the end of the
region (bug#46332).
---
lisp/ansi-color.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
(limited to 'lisp/ansi-color.el')
diff --git a/lisp/ansi-color.el b/lisp/ansi-color.el
index e5bfccdb8ba..44dc0351d45 100644
--- a/lisp/ansi-color.el
+++ b/lisp/ansi-color.el
@@ -429,7 +429,8 @@ being deleted."
;; positions that overlap regions previously colored; these
;; `codes' should not be applied to that overlap, so we need
;; to know where they should really start.
- (setq ansi-color-context-region (if codes (list codes end-marker)))))
+ (setq ansi-color-context-region
+ (if codes (list codes (copy-marker (point)))))))
;; Clean up our temporary markers.
(unless (eq start-marker (cadr ansi-color-context-region))
(set-marker start-marker nil))
--
cgit v1.2.3