branch: elpa/gptel commit 9c475b1ffb153a05fde25e10262bb07c4e5129a4 Author: Karthik Chikmagalur <karthikchikmaga...@gmail.com> Commit: Karthik Chikmagalur <karthikchikmaga...@gmail.com>
gptel-transient: Add log level and inspect log options * gptel-transient.el (gptel-menu): Add logging options, hidden behind `gptel-expert-options'. --- gptel-transient.el | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) diff --git a/gptel-transient.el b/gptel-transient.el index 3d49bff18f..4c0dcb65fe 100644 --- a/gptel-transient.el +++ b/gptel-transient.el @@ -793,7 +793,26 @@ Also format its value in the Transient menu." (gptel--inspect-query (gptel--suffix-send (cons "I" (transient-args transient-current-command))) - 'json)))]] + 'json)))] + ["Logging" + :if (lambda () (or gptel-log-level gptel-expert-commands)) + ("-l" "Log level" "-l" + :class gptel-lisp-variable + :variable gptel-log-level + :set-value gptel--set-with-scope + :display-nil "Off" + :prompt "Prompt: " + :reader + (lambda (prompt _ _) + "Manage gptel's logging." + (let ((state (completing-read + "Log level: " '(off info debug) nil t))) + (message "Log level set to %s" state) + (if (eq state 'off) nil (intern state))))) + ("L" "Inspect Log" + (lambda () (interactive) + (pop-to-buffer (get-buffer-create gptel--log-buffer-name))) + :format " %k %d")]] [(gptel--suffix-send)] (interactive) (gptel--sanitize-model)