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.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/elisp/geiser-debug.el b/elisp/geiser-debug.el
index 9c652fe..971001f 100644
--- a/elisp/geiser-debug.el
+++ b/elisp/geiser-debug.el
@@ -194,7 +194,11 @@ buffer.")
(save-excursion
(goto-char (/ (+ end start) 2))
(geiser-autodoc--clean-cache))
- (unless nomsg (message "%s" res)))
+ (unless nomsg
+ (save-match-data
+ (when (string-match "\\(?:[ \t\n\r]+\\)\\'" res)
+ (setq res (replace-match "" t t res))))
+ (message "%s" res)))
(geiser-debug--display-retort (geiser-syntax--scheme-str str) ret res)
ret))