diff options
| author | jao <jao@gnu.org> | 2021-04-11 00:04:03 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2021-04-11 00:04:03 +0100 |
| commit | aa26163aa81b5af3bc5bbf23bec8b5776de3a8bc (patch) | |
| tree | f3e76cf950e26574e532f3eb77db97a642caed46 /elisp | |
| parent | 1bf725d88eae69b58be748906407b77a7c434a3d (diff) | |
| download | geiser-aa26163aa81b5af3bc5bbf23bec8b5776de3a8bc.tar.gz geiser-aa26163aa81b5af3bc5bbf23bec8b5776de3a8bc.tar.bz2 | |
Fix for ANSI color treatments
Diffstat (limited to 'elisp')
| -rw-r--r-- | elisp/geiser-debug.el | 4 |
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) |