gptel: Fix url-retrieve response parser bug

* gptel.el (gptel--url-parse-response): Fix quoted variable in
response parser.
This commit is contained in:
Karthik Chikmagalur 2024-04-22 12:37:20 -07:00
parent 2b938114cf
commit 9b094b8b1e

View file

@ -1161,7 +1161,7 @@ See `gptel-curl--get-response' for its contents.")
((or (memq url-http-response-status '(200 100)) ((or (memq url-http-response-status '(200 100))
(string-match-p "\\(?:1\\|2\\)00 OK" http-msg)) (string-match-p "\\(?:1\\|2\\)00 OK" http-msg))
(list (string-trim (gptel--parse-response backend response (list (string-trim (gptel--parse-response backend response
'(:buffer response-buffer))) `(:buffer ,response-buffer)))
http-msg)) http-msg))
((plist-get response :error) ((plist-get response :error)
(let* ((error-data (plist-get response :error)) (let* ((error-data (plist-get response :error))