summaryrefslogtreecommitdiff
path: root/elisp/geiser-repl.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-08-24 18:13:36 +0100
committerjao <jao@gnu.org>2022-08-24 18:16:33 +0100
commit2695870666ed0c699f26421963ce69a321ec6016 (patch)
treedc1533fe855c132f2dfdd603c374eca52dc52cd5 /elisp/geiser-repl.el
parent562baaf8b6aeba9e32896974c700fe9b0f1b2d6b (diff)
downloadgeiser-2695870666ed0c699f26421963ce69a321ec6016.tar.gz
geiser-2695870666ed0c699f26421963ce69a321ec6016.tar.bz2
docstring for geiser-repl-maybe-send
Diffstat (limited to 'elisp/geiser-repl.el')
-rw-r--r--elisp/geiser-repl.el11
1 files changed, 9 insertions, 2 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index c9d3eee..bf26f1a 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -122,7 +122,7 @@ change that."
:type 'boolean)
(geiser-custom--defcustom geiser-repl-send-on-return-p t
- "Sends input to REPL when ENTER is pressed in a balanced S-expression,
+ "Wheter to Send input to REPL when ENTER is pressed in a balanced S-expression,
regardless of cursor positioning.
When off, pressing ENTER inside a balance S-expression will
@@ -834,9 +834,16 @@ If SAVE-HISTORY is non-nil, save CMD in the REPL history."
(comint-send-string proc (geiser-eval--scheme-str '(:ge no-values)))
(comint-send-string proc "\n")))))
-(define-obsolete-function-alias 'geiser-repl--maybe-send #'geiser-repl-maybe-send "0.25.2")
+(define-obsolete-function-alias 'geiser-repl--maybe-send
+ #'geiser-repl-maybe-send "0.25.2")
(defun geiser-repl-maybe-send ()
+ "Handle the current input at the REPL's prompt.
+
+If `geiser-repl-send-on-return-p' is t and the input is a
+complete sexp, send the input to the REPL process; otherwise,
+insert a new line and, if `geiser-repl-auto-indent-p' is t,
+indentation."
(interactive)
(let ((p (point)))
(cond ((< p (geiser-repl--last-prompt-start))