branch: elpa/aidermacs
commit 380d1fe3c01792ca78fcffe225c8eee2f180fd33
Author: Kang Tu <kang...@apple.com>
Commit: Kang Tu <kang...@apple.com>
give up multiple line input
---
helm-aider.el | 6 ++----
1 file changed, 2 insertions(+), 4 deletions(-)
diff --git a/helm-aider.el b/helm-aider.el
index bfba56c7db..ba8fa106d2 100644
--- a/helm-aider.el
+++ b/helm-aider.el
@@ -1,3 +1,4 @@
+
;; optional helm based completion, need to be manually loaded when needed
;; helm based aider input
@@ -37,8 +38,7 @@
(load-aider-helm-read-string-history)
(defun aider-helm-read-string (prompt &optional initial-input default-value)
- "Read a string with Helm completion, showing historical inputs.
-Automatically remove newline characters from the input."
+ "Read a string with Helm completion, showing historical inputs."
(let* ((input (helm-comp-read
prompt
aider-helm-read-string-history
@@ -47,8 +47,6 @@ Automatically remove newline characters from the input."
:history 'aider-helm-read-string-history
:initial-input initial-input
:default default-value)))
- ;; Remove newline characters from the input
- (setq input (replace-regexp-in-string "\n" "" input))
;; Add input to history if it's not empty
(unless (string-empty-p input)
(add-to-history 'aider-helm-read-string-history input))
