summaryrefslogtreecommitdiff
path: root/elisp/geiser-repl.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2015-03-12 03:18:47 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2015-03-12 03:18:47 +0100
commita92b7155cf43e0ca4278286455ec4e60186eaf93 (patch)
tree246cfd8931e19aef875ca8cdc78e1cc4baae4756 /elisp/geiser-repl.el
parent1386520ff80d06eb3657a9fafa7af272677c46e2 (diff)
downloadgeiser-a92b7155cf43e0ca4278286455ec4e60186eaf93.tar.gz
geiser-a92b7155cf43e0ca4278286455ec4e60186eaf93.tar.bz2
Fix for RET with point at the beginning of line after M-p
Diffstat (limited to 'elisp/geiser-repl.el')
-rw-r--r--elisp/geiser-repl.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index c5c0490..71385eb 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -607,7 +607,9 @@ module command as a string")
(if (geiser-repl--is-history-input)
(geiser-repl--grab-input)
(ignore-errors (compile-goto-error))))
- ((progn (end-of-line) (<= (geiser-repl--nesting-level) 0))
+ ((let ((inhibit-field-text-motion t))
+ (end-of-line)
+ (<= (geiser-repl--nesting-level) 0))
(geiser-repl--send-input))
(t (goto-char p)
(if geiser-repl-auto-indent-p