emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/llm 721def8f9f 1/2: Don't ask the user before canceling


From: ELPA Syncer
Subject: [elpa] externals/llm 721def8f9f 1/2: Don't ask the user before canceling the query
Date: Sun, 24 Dec 2023 18:58:02 -0500 (EST)

branch: externals/llm
commit 721def8f9f581c4ad5cd8e9e805efe0b3267f8c5
Author: Steven Allen <steven@stebalien.com>
Commit: Steven Allen <steven@stebalien.com>

    Don't ask the user before canceling the query
    
    `kill-buffer-query-functions` often contains
    `process-kill-buffer-query-function`, which will ask the user if they
    want to kill the request buffer if it has an associated process (in our
    case, an HTTP request).
---
 llm.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/llm.el b/llm.el
index 699ea554f2..8ae76632da 100644
--- a/llm.el
+++ b/llm.el
@@ -253,7 +253,7 @@ VECTOR-CALLBACK will be called with the vector embedding.
 ERROR-CALLBACK will be called in the event of an error, with an
 error signal and a string message.
 
-This returns an object representing the asymc request, which can
+This returns an object representing the async request, which can
 be passed to `llm-cancel-request'."
   (ignore provider string vector-callback error-callback)
   (signal 'not-implemented nil))
@@ -285,7 +285,8 @@ methods."
   (lwarn 'llm :warning  "Canceling a request is not supported for this LLM."))
 
 (cl-defmethod llm-cancel-request ((buf buffer))
-  (cl-letf (((symbol-function 'url-http-async-sentinel) (lambda (_ _))))
+  (cl-letf (((symbol-function 'url-http-async-sentinel) (lambda (_ _)))
+            (kill-buffer-query-functions nil))
     (kill-buffer buf)))
 
 (defun llm-chat-prompt-to-text (prompt)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]