branch: elpa/gptel
commit 4edf81cb7ad680280549e2fcf63ba4e4dc7e51d5
Author: Karthik Chikmagalur <karthikchikmaga...@gmail.com>
Commit: Karthik Chikmagalur <karthikchikmaga...@gmail.com>

    gptel: Linting
    
    * gptel.el (gptel-cache): Add customization type for
    `gptel-cache', linting.
    
    * gptel-anthropic.el (gptel--parse-list): Linting.
---
 gptel-anthropic.el | 2 +-
 gptel.el           | 9 ++++++++-
 2 files changed, 9 insertions(+), 2 deletions(-)

diff --git a/gptel-anthropic.el b/gptel-anthropic.el
index 659ba652e9..9dd2214fed 100644
--- a/gptel-anthropic.el
+++ b/gptel-anthropic.el
@@ -304,7 +304,7 @@ TOOL-USE is a list of plists containing tool names, 
arguments and call results."
         (message "Unexpected tool_call_id format: %s" tool-id)
         tool-id)))
 
-(cl-defmethod gptel--parse-list ((backend gptel-anthropic) prompt-list)
+(cl-defmethod gptel--parse-list ((_backend gptel-anthropic) prompt-list)
   (cl-loop for text in prompt-list
            for role = t then (not role)
            if text
diff --git a/gptel.el b/gptel.el
index 1fddf22c90..d1a25d0ed2 100644
--- a/gptel.el
+++ b/gptel.el
@@ -506,7 +506,12 @@ Setting it to (message system) will cache the system 
message and
 the conversation text.
 
 Setting it to (message system tool) will cache everything and is
-the same as t.")
+the same as t."
+  :type '(choice
+          (const :tag "Cache everything" t)
+          (const :tag "Do not cache" nil)
+          (repeat symbol))
+  :group 'gptel)
 
 (defvar gptel--known-backends)
 
@@ -2881,6 +2886,8 @@ INTERACTIVEP is t when gptel is called interactively."
 
 
 ;;; Reasoning content UI
+(declare-function gptel-curl--stream-insert-response "gptel-curl")
+
 (defun gptel--display-reasoning-stream (text info)
   "Show reasoning TEXT in an appropriate location.
 

Reply via email to