From 03113afd500607b9b1f995aa836ef09955a784cf Mon Sep 17 00:00:00 2001 From: Karthik Chikmagalur Date: Wed, 8 Mar 2023 00:56:32 -0800 Subject: [PATCH] gptel: Rename internal functions gptel.el (gptel-parse-response, gptel-get-response): These functions have been renamed to mark them for internal use. --- gptel.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/gptel.el b/gptel.el index ec77a5b..7467e8a 100644 --- a/gptel.el +++ b/gptel.el @@ -117,7 +117,7 @@ When set to nil, it is inserted all at once. (response (aio-await (funcall (if (and gptel-use-curl (require 'gptel-curl nil t)) - #'gptel--curl-get-response #'gptel-get-response) + #'gptel--curl-get-response #'gptel--get-response) full-prompt))) (content-str (plist-get response :content)) (status-str (plist-get response :status))) @@ -143,7 +143,7 @@ When set to nil, it is inserted all at once. (propertize (format " Response Error: %s" status-str) 'face 'error))))) -(aio-defun gptel-get-response (prompts) +(aio-defun gptel--get-response (prompts) "Fetch response for PROMPTS from ChatGPT. Return the message received." @@ -169,10 +169,10 @@ Return the message received." (aio-await (aio-url-retrieve "https://api.openai.com/v1/chat/completions")))) (prog1 - (gptel-parse-response response-buffer) + (gptel--parse-response response-buffer) (kill-buffer response-buffer))))) -(defun gptel-parse-response (response-buffer) +(defun gptel--parse-response (response-buffer) "Parse response in RESPONSE-BUFFER." (when (buffer-live-p response-buffer) (with-current-buffer response-buffer