summaryrefslogtreecommitdiff
path: root/elisp
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2016-06-13 01:59:02 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2016-06-13 01:59:02 +0200
commit8a6302ea46e742ef746612e8456b065e6faafe87 (patch)
tree8b57e3bc378843697316b9d80d1895c75ec364bd /elisp
parent88ef52e593af1c0328584680360bb7b5c02324a4 (diff)
downloadgeiser-8a6302ea46e742ef746612e8456b065e6faafe87.tar.gz
geiser-8a6302ea46e742ef746612e8456b065e6faafe87.tar.bz2
(end-of-line 0) > (forward-line -1) (end-of-line)
Diffstat (limited to 'elisp')
-rw-r--r--elisp/geiser-repl.el3
1 files changed, 1 insertions, 2 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index 2f8988d..bbf83fa 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -863,8 +863,7 @@ With a prefix argument, force exit by killing the scheme process."
(defun geiser-repl-previous-prompt (n)
(interactive "p")
(when (> n 0)
- (forward-line -1)
- (end-of-line)
+ (end-of-line 0)
(when (re-search-backward comint-prompt-regexp nil 'go n)
(goto-char (match-end 0)))))