1
0
Fork 0

Switch to markdown-mode in a dedicated response buffer

Markdown formatting not supported (yet) in the shell.
This commit is contained in:
Bram Schoenmakers 2024-07-21 21:48:32 +02:00
parent 3ae19c59db
commit 823f3256c3
Signed by: bram
GPG key ID: 0CCD19DFDC63258F

View file

@ -391,13 +391,17 @@ retrieving a result from Lisp code."
(gethash "code" firsterror))) (gethash "code" firsterror)))
(error "An error occurred while querying FastGPT"))))) (error "An error occurred while querying FastGPT")))))
(declare-function markdown-mode nil)
(defun kagi--fastgpt-display-result (result) (defun kagi--fastgpt-display-result (result)
"Display the RESULT of a FastGPT prompt in a new buffer." "Display the RESULT of a FastGPT prompt in a new buffer."
(let ((buffer-name (generate-new-buffer-name "*fastgpt-result*"))) (let ((buffer-name (generate-new-buffer-name "*fastgpt-result*")))
(with-current-buffer (get-buffer-create buffer-name) (with-current-buffer (get-buffer-create buffer-name)
(save-excursion (save-excursion
(insert result)) (insert result))
(text-mode) (if (featurep 'markdown-mode)
(markdown-mode)
(text-mode))
(display-buffer buffer-name)))) (display-buffer buffer-name))))
(defun kagi--fastgpt-welcome-message (_config) (defun kagi--fastgpt-welcome-message (_config)