From 2695870666ed0c699f26421963ce69a321ec6016 Mon Sep 17 00:00:00 2001 From: jao Date: Wed, 24 Aug 2022 18:13:36 +0100 Subject: docstring for geiser-repl-maybe-send --- elisp/geiser-repl.el | 11 +++++++++-- 1 file changed, 9 insertions(+), 2 deletions(-) (limited to 'elisp') 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)) -- cgit v1.2.3