branch: elpa/aidermacs
commit 717d2ceb5193b862f37a1a3def64ed84c80bc840
Author: Mingde (Matthew) Zeng (aider) <matthew...@posteo.net>
Commit: Mingde (Matthew) Zeng (aider) <matthew...@posteo.net>
fix: Prevent duplicate aider wrappers in multi-line messages
---
aider.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/aider.el b/aider.el
index 1feabd5be8..9234125fcc 100644
--- a/aider.el
+++ b/aider.el
@@ -490,9 +490,10 @@ from the source buffer and maintaining proper process
markers."
(defun aider--process-message-if-multi-line (str)
"Entering multi-line chat messages
https://aider.chat/docs/usage/commands.html#entering-multi-line-chat-messages
-If STR contains newlines, wrap it in {aider\\nstr\\naider}.
-Otherwise return STR unchanged."
- (if (string-match-p "\n" str)
+If STR contains newlines and isn't already wrapped in {aider...aider},
+wrap it in {aider\\nstr\\naider}. Otherwise return STR unchanged."
+ (if (and (string-match-p "\n" str)
+ (not (string-match-p "^{aider\n.*\naider}$" str)))
(format "{aider\n%s\naider}" str)
str))
