diff options
author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2015-03-12 03:18:47 +0100 |
---|---|---|
committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2015-03-12 03:18:47 +0100 |
commit | a92b7155cf43e0ca4278286455ec4e60186eaf93 (patch) | |
tree | 246cfd8931e19aef875ca8cdc78e1cc4baae4756 | |
parent | 1386520ff80d06eb3657a9fafa7af272677c46e2 (diff) | |
download | geiser-a92b7155cf43e0ca4278286455ec4e60186eaf93.tar.gz geiser-a92b7155cf43e0ca4278286455ec4e60186eaf93.tar.bz2 |
Fix for RET with point at the beginning of line after M-p
-rw-r--r-- | elisp/geiser-repl.el | 4 |
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 |