[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/ellama 324ddf1d1e 1/3: Apply markdown-to-org filter con
From: |
ELPA Syncer |
Subject: |
[elpa] externals/ellama 324ddf1d1e 1/3: Apply markdown-to-org filter consistently |
Date: |
Sat, 10 Feb 2024 06:57:55 -0500 (EST) |
branch: externals/ellama
commit 324ddf1d1e88aa510ed21d20d6f8c9bf1e2e07d3
Author: Steven Allen <steven@stebalien.com>
Commit: Steven Allen <steven@stebalien.com>
Apply markdown-to-org filter consistently
- Don't apply it in chat buffers unless we're using org-mode.
- In instant buffers, check the effective mode instead of checking the
mode function.
---
ellama.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/ellama.el b/ellama.el
index ff6fc39109..c202e8e856 100644
--- a/ellama.el
+++ b/ellama.el
@@ -761,7 +761,8 @@ If CREATE-SESSION set, creates new session even if there is
an active session."
(ellama-stream prompt
:session session
:on-done #'ellama-chat-done
- :filter #'ellama--translate-markdown-to-org-filter)))))
+ :filter (when (derived-mode-p 'org-mode)
+
#'ellama--translate-markdown-to-org-filter))))))
;;;###autoload
(defun ellama-ask-about ()
@@ -808,10 +809,11 @@ If CREATE-SESSION set, creates new session even if there
is an active session."
(buffer (get-buffer-create (if (get-buffer buffer-name)
(make-temp-name (concat buffer-name "
"))
buffer-name)))
- (filter (when (equal ellama-major-mode 'org-mode)
- 'ellama--translate-markdown-to-org-filter)))
+ filter)
(with-current-buffer buffer
- (funcall ellama-major-mode))
+ (funcall ellama-major-mode)
+ (when (derived-mode-p 'org-mode)
+ (setq filter 'ellama--translate-markdown-to-org-filter)))
(display-buffer buffer)
(ellama-stream prompt
:buffer buffer