summaryrefslogtreecommitdiff
path: root/elisp/geiser-debug.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-12-28 04:19:09 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-12-28 04:19:09 +0100
commitd06e8983b1c49c681eb2ce22d001fd6125a3e9b3 (patch)
tree315fdadc0f1a763b8953e00f8eabc9ce73c71a8b /elisp/geiser-debug.el
parent87af9354491a6faf7cec13d45f303e1eca7e50f0 (diff)
downloadgeiser-d06e8983b1c49c681eb2ce22d001fd6125a3e9b3.tar.gz
geiser-d06e8983b1c49c681eb2ce22d001fd6125a3e9b3.tar.bz2
Bug fix for postfix error message display in debug buffer
The message and the evaluated expression where getting mixed for Guile.
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 02b463e..0d76fde 100644
--- a/elisp/geiser-debug.el
+++ b/elisp/geiser-debug.el
@@ -126,7 +126,9 @@ buffer.")
(insert res)
(newline 2))
(setq jump (geiser-debug--display-error impl module key output))
- (when after (insert "\nExpression evaluated was:\n\n" what))
+ (when after
+ (goto-char (point-max))
+ (insert "\nExpression evaluated was:\n\n" what))
(goto-char (point-min)))
(when jump (geiser-debug--pop-to-buffer))))