branch: elpa/gptel commit fc06fe9e3b0f5a269d9c8eaf7195de43d1fbee67 Author: Karthik Chikmagalur <karthikchikmaga...@gmail.com> Commit: Karthik Chikmagalur <karthikchikmaga...@gmail.com>
gptel: Linting Linting changes across buffers. * gptel-openai-extras.el (gptel-make-perplexity): (gptel--parse-buffer): (gptel-make-deepseek): * gptel-openai.el (gptel-make-openai): * gptel-transient.el (gptel-add): --- gptel-openai-extras.el | 8 +++++--- gptel-openai.el | 2 +- gptel-transient.el | 1 + 3 files changed, 7 insertions(+), 4 deletions(-) diff --git a/gptel-openai-extras.el b/gptel-openai-extras.el index 42d3edda16..639e33e0dd 100644 --- a/gptel-openai-extras.el +++ b/gptel-openai-extras.el @@ -219,7 +219,7 @@ the response." ;;;###autoload (cl-defun gptel-make-perplexity (name &key curl-args stream key - (header + (header (lambda () (when-let* ((key (gptel--get-api-key))) `(("Authorization" . ,(concat "Bearer " key)))))) (host "api.perplexity.ai") @@ -309,7 +309,7 @@ parameters." (when (and (stringp reasoning) (length> reasoning 0)) (plist-put info :reasoning reasoning)))) -(cl-defmethod gptel--parse-buffer :around ((_backend gptel-deepseek) max-entries) +(cl-defmethod gptel--parse-buffer :around ((_backend gptel-deepseek) _max-entries) "Merge successive prompts in the prompts list that have the same role. The Deepseek API requires strictly alternating roles (user/assistant) in messages." @@ -346,7 +346,9 @@ The Deepseek API requires strictly alternating roles (user/assistant) in message :context-window 64 :input-cost 0.27 :output-cost 1.10)))) - "Register a DeepSeek backend for gptel with NAME." + "Register a DeepSeek backend for gptel with NAME. + +For the meanings of the keyword arguments, see `gptel-make-openai'." (declare (indent 1)) (let ((backend (gptel--make-deepseek :name name diff --git a/gptel-openai.el b/gptel-openai.el index f8d593609e..8d16119399 100644 --- a/gptel-openai.el +++ b/gptel-openai.el @@ -522,7 +522,7 @@ information, in the form (model-name . plist) For a list of currently recognized plist keys, see -`gptel--openai-models'. An example of a model specification +`gptel--openai-models'. An example of a model specification including both kinds of specs: :models diff --git a/gptel-transient.el b/gptel-transient.el index b92bddc2ef..0b70d59be8 100644 --- a/gptel-transient.el +++ b/gptel-transient.el @@ -1129,6 +1129,7 @@ supports. See `gptel-track-media' for more information." (declare-function gptel-context--at-point "gptel-context") (declare-function gptel-add "gptel-context") +(declare-function gptel-context-add-current-kill "gptel-context") (transient-define-suffix gptel--infix-context-add-current-kill (&optional arg) "Add current kill to gptel's context."