From aa26163aa81b5af3bc5bbf23bec8b5776de3a8bc Mon Sep 17 00:00:00 2001 From: jao Date: Sun, 11 Apr 2021 00:04:03 +0100 Subject: Fix for ANSI color treatments --- elisp/geiser-debug.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/elisp/geiser-debug.el b/elisp/geiser-debug.el index cb557bf..efb3846 100644 --- a/elisp/geiser-debug.el +++ b/elisp/geiser-debug.el @@ -181,8 +181,8 @@ buffer.") (insert "\nExpression evaluated was:\n\n") (geiser-debug--display-error impl module nil what)) (cl-case geiser-debug-treat-ansi-colors - (colors (ansi-color-apply-on-region (point-min) (point))) - (remove (ansi-color-filter-region (point-min) (point)))) + (colors (ansi-color-apply-on-region (point-min) (point-max))) + (remove (ansi-color-filter-region (point-min) (point-max)))) (goto-char (point-min))) (when (or img dbg) (when (or geiser-debug-jump-to-debug-p geiser-debug-show-debug-p) -- cgit v1.2.3