(defun auth-api-key-get-credentials ()
  (let ((key (uiop:getenv "LLM_API_KEY")))
    (when key
      (list :api-key key))))

(defun register-auth-provider (provider-name credential-fn)
  "Register a simple API key provider in the kernel."
  (org-agent:register-auth-provider provider-name credential-fn))

;; Register as the default auth provider for Gemini during transition
(register-auth-provider :gemini #'auth-api-key-get-credentials)