branch: elpa/gptel commit 92082e7af143752cee8123f03f6130229d733878 Author: Karthik Chikmagalur <karthikchikmaga...@gmail.com> Commit: Karthik Chikmagalur <karthikchikmaga...@gmail.com>
gptel: Fix gptel-send message * gptel.el (gptel-send): Because of on-the-fly presets, the backend used by a `gptel-send' request can be different from `gptel-backend'. Message the user naming the backend that was actually used. --- gptel.el | 14 +++++++++----- 1 file changed, 9 insertions(+), 5 deletions(-) diff --git a/gptel.el b/gptel.el index 49be6c519b..0cb94b8371 100644 --- a/gptel.el +++ b/gptel.el @@ -2620,12 +2620,16 @@ waiting for the response." (interactive "P") (if (and arg (require 'gptel-transient nil t)) (call-interactively #'gptel-menu) - (message "Querying %s..." (gptel-backend-name gptel-backend)) (gptel--sanitize-model) - (gptel-request nil - :stream gptel-stream - :transforms gptel-prompt-transform-functions - :fsm (gptel-make-fsm :handlers gptel-send--handlers)) + (let ((fsm (gptel-make-fsm :handlers gptel-send--handlers))) + (gptel-request nil + :stream gptel-stream + :transforms gptel-prompt-transform-functions + :fsm fsm) + (message "Querying %s..." + (thread-first (gptel-fsm-info fsm) + (plist-get :backend) + (gptel-backend-name)))) (gptel--update-status " Waiting..." 'warning))) (declare-function json-pretty-print-buffer "json")