From 516d3e90613c5910d6af34842aa613275344d924 Mon Sep 17 00:00:00 2001 From: "Diogo F. S. Ramos" Date: Thu, 11 Apr 2013 18:56:30 -0300 Subject: 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. --- elisp/geiser-debug.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'elisp/geiser-debug.el') 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)) -- cgit v1.2.3