gptel: Change how api-key is read

* gptel.el (gptel): If the function `gptel--api-key' fails to find the API key
from `gptel-api-key', prompt the user directly.
This commit is contained in:
Karthik Chikmagalur 2023-03-18 12:59:25 -07:00
parent 6f951ed690
commit 9f8a984729

View file

@ -354,9 +354,10 @@ buffer created or switched to."
(interactive (list (if current-prefix-arg
(read-string "Session name: " (generate-new-buffer-name gptel-default-session))
gptel-default-session)
(or gptel-api-key
(setq gptel-api-key
(read-passwd "OpenAI API key: ")))
(condition-case nil
(gptel--api-key)
((error user-error)
(read-passwd "OpenAI API key: ")))
(and (use-region-p)
(buffer-substring (region-beginning)
(region-end)))))