summaryrefslogtreecommitdiff
path: root/elisp/geiser-debug.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-debug.el')
-rw-r--r--elisp/geiser-debug.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/elisp/geiser-debug.el b/elisp/geiser-debug.el
index a064589..cb557bf 100644
--- a/elisp/geiser-debug.el
+++ b/elisp/geiser-debug.el
@@ -12,6 +12,8 @@
;;; Code:
+(eval-when-compile (require 'cl-macs))
+
(require 'geiser-edit)
(require 'geiser-autodoc)
(require 'geiser-impl)
@@ -178,7 +180,7 @@ buffer.")
(goto-char (point-max))
(insert "\nExpression evaluated was:\n\n")
(geiser-debug--display-error impl module nil what))
- (case geiser-debug-treat-ansi-colors
+ (cl-case geiser-debug-treat-ansi-colors
(colors (ansi-color-apply-on-region (point-min) (point)))
(remove (ansi-color-filter-region (point-min) (point))))
(goto-char (point-min)))