summaryrefslogtreecommitdiff
path: root/elisp/geiser-debug.el
diff options
context:
space:
mode:
authorDiogo F. S. Ramos <diogofsr@gmail.com>2013-04-11 18:56:30 -0300
committerJose Antonio Ortega Ruiz <jao@gnu.org>2013-04-12 00:17:00 +0200
commit2ebc1225b929d2a3c3b25fbd7596adb4d49915f0 (patch)
tree1c052ad067b05d3d17a0943699a9a61faecd48e6 /elisp/geiser-debug.el
parent246175eadf22a2ab7121be68d37d01f320ddb44a (diff)
downloadgeiser-guile-2ebc1225b929d2a3c3b25fbd7596adb4d49915f0.tar.gz
geiser-guile-2ebc1225b929d2a3c3b25fbd7596adb4d49915f0.tar.bz2
Evaluate last expression to buffer with a prefix
Use a prefix before pressing C-x C-e to print the result of evaluating the expression before mark to the current buffer.
Diffstat (limited to 'elisp/geiser-debug.el')
-rw-r--r--elisp/geiser-debug.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/elisp/geiser-debug.el b/elisp/geiser-debug.el
index c35f577..184d9c8 100644
--- a/elisp/geiser-debug.el
+++ b/elisp/geiser-debug.el
@@ -172,9 +172,9 @@ buffer.")
(when (not err)
(save-excursion
(goto-char (/ (+ end start) 2))
- (geiser-autodoc--clean-cache))
- (message "%s" res))
- (geiser-debug--display-retort (geiser-syntax--scheme-str str) ret res)))
+ (geiser-autodoc--clean-cache)))
+ (geiser-debug--display-retort (geiser-syntax--scheme-str str) ret res)
+ ret))
(defun geiser-debug--expand-region (start end all wrap)
(let* ((str (buffer-substring-no-properties start end))