summaryrefslogtreecommitdiff
path: root/elisp/geiser-debug.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2021-04-11 00:04:03 +0100
committerjao <jao@gnu.org>2021-04-11 00:04:03 +0100
commitaa26163aa81b5af3bc5bbf23bec8b5776de3a8bc (patch)
treef3e76cf950e26574e532f3eb77db97a642caed46 /elisp/geiser-debug.el
parent1bf725d88eae69b58be748906407b77a7c434a3d (diff)
downloadgeiser-aa26163aa81b5af3bc5bbf23bec8b5776de3a8bc.tar.gz
geiser-aa26163aa81b5af3bc5bbf23bec8b5776de3a8bc.tar.bz2
Fix for ANSI color treatments
Diffstat (limited to 'elisp/geiser-debug.el')
-rw-r--r--elisp/geiser-debug.el4
1 files 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)