Getting "Lisp error: (void-variable function)" if I use :custom stanza in use-package gptel

[ParetoOptimalDev]

It's possible this is related to some autoloads changes in NixOS and not related to gptel as I recently updated emacs.

But posting here because it only seems to be happening with the gptel package using:

(use-package gptel
  :custom
  (gptel-default-mode . #'org-mode))

system info:

NixOS unstable
GNU Emacs 30.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.38, cairo version 1.18.0)

traceback:

Debugger entered--Lisp error: (void-variable function)
  eval(function)
  custom-initialize-reset(gptel-default-mode (funcall #'#f(compiled-function () #<bytecode 0x102d828c94ec7585>)))
  custom-declare-variable(gptel-default-mode (funcall #'#f(compiled-function () #<bytecode 0x102d828c94ec7585>)) "The default major mode for dedicated chat buffers.\n\nIf `markdown-mode' is available, it is used.  Otherwise gptel\ndefaults to `text-mode'." :group gptel :type symbol)
  byte-code("\300\301\302\303\304DD\305\306\307\310\311&\7\210\300\312\302\303\313DD\314\306\307\310\315&\7\210\300\316\302\303\317DD\320\306\307\310\321&\7\210\300\322\302\303\323DD\324\310\325\306\307&\7\210\300\326\302\303\327DD\330\306\307\310\331&\7\210\332\333\334\"\210\332\335\336\"\210\300\337\302\303\340DD\341\306\307\342\335\310\343&\11\207" [custom-declare-variable gptel-default-mode funcall function #f(compiled-function () #<bytecode 0x102d828c94ec7585>) "The default major mode for dedicated chat buffers.\n\nIf `markdown-mode' is available, it is used.  Otherwise gptel\ndefaults to `text-mode'." :group gptel :type symbol gptel-prompt-prefix-alist #f(compiled-function () #<bytecode 0x19800016fe914>) "String used as a prefix to the query being sent to the LLM.\n\nThis is meant for the user to distinguish between queries and\nresponses, and is removed from the query before it is sent.\n\nThis is an alist mapping major modes to the prefix strings.  This\nis only inserted in dedicated gptel buffers." (alist :key-type symbol :value-type string) gptel-response-prefix-alist #f(compiled-function () #<bytecode 0x19800016fe914>) "String inserted before the response from the LLM.\n\nThis is meant for the user to distinguish between queries and\nresponses.\n\nThis is an alist mapping major modes to the reply prefix strings.  This\nis only inserted in dedicated gptel buffers before the AI's response." (alist :key-type symbol :value-type string) gptel-use-header-line #f(compiled-function () #<bytecode 0x19800016fe5d4>) "Whether `gptel-mode' should use header-line for status\ninformation.\n\nWhen set to nil, use the mode line for (minimal) status\ninformation and the echo area for messages." boolean gptel-crowdsourced-prompts-file #f(compiled-function () #<bytecode 0xc127647dd850e5d>) "File used to store crowdsourced system prompts.\n\nThese are prompts cached from an online source (see\n`gptel--crowdsourced-prompts-url'), and can be set from the\ntransient menu interface provided by `gptel-menu'." file defalias gptel--button-buttonize button-buttonize gptel--always always gptel-directives #f(compiled-function () #<bytecode 0x19800016fe914>) "System prompts (directives) for ChatGPT.\n\nThese are system instructions sent at the beginning of each\nrequest to ChatGPT.\n\nEach entry in this alist maps a symbol naming the directive to\nthe string that is sent.  To set the directive for a chat session\ninteractively call `gptel-send' with a prefix argument." :safe (alist :key-type symbol :value-type string)] 10)
  require(gptel nil t)
  (not (require 'gptel nil t))
  (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))
  (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode function nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error)))
  (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode function nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) ((debug error) (funcall use-package--warning422 :catch err)))
  (progn (defvar use-package--warning422 #'(lambda (keyword err) (let ((msg (format "%s/%s: %s" ... keyword ...))) (display-warning 'use-package msg :error)))) (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode function nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) ((debug error) (funcall use-package--warning422 :catch err))))
  eval((progn (defvar use-package--warning422 #'(lambda (keyword err) (let ((msg ...)) (display-warning 'use-package msg :error)))) (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq ... custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode function nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) ((debug error) (funcall use-package--warning422 :catch err)))) nil)
  elisp--eval-last-sexp(nil)
  eval-last-sexp(nil)
  funcall-interactively(eval-last-sexp nil)
  command-execute(eval-last-sexp)

[karthink]

Ah, I've set the customize type for gptel-default-mode to 'symbol, it should be 'function. Or both should be valid. I'll fix it. Try changing it from #'org-mode to 'org-mode

…

On Fri, Jan 5, 2024, 8:56 AM ParetoOptimalDev ***@***.***> wrote: It's possible this is related to some autoloads changes in NixOS and not related to gptel as I recently updated emacs. But posting here because it only seems to be happening with the gptel package using: (use-package gptel :custom (gptel-default-mode . #'org-mode)) system info: NixOS unstable GNU Emacs 30.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.38, cairo version 1.18.0) traceback: Debugger entered--Lisp error: (void-variable function) eval(function) custom-initialize-reset(gptel-default-mode (funcall #'#f(compiled-function () #<bytecode 0x102d828c94ec7585>))) custom-declare-variable(gptel-default-mode (funcall #'#f(compiled-function () #<bytecode 0x102d828c94ec7585>)) "The default major mode for dedicated chat buffers.\n\nIf `markdown-mode' is available, it is used. Otherwise gptel\ndefaults to `text-mode'." :group gptel :type symbol) byte-code("\300\301\302\303\304DD\305\306\307\310\311&\7\210\300\312\302\303\313DD\314\306\307\310\315&\7\210\300\316\302\303\317DD\320\306\307\310\321&\7\210\300\322\302\303\323DD\324\310\325\306\307&\7\210\300\326\302\303\327DD\330\306\307\310\331&\7\210\332\333\334\"\210\332\335\336\"\210\300\337\302\303\340DD\341\306\307\342\335\310\343&\11\207" [custom-declare-variable gptel-default-mode funcall function #f(compiled-function () #<bytecode 0x102d828c94ec7585>) "The default major mode for dedicated chat buffers.\n\nIf `markdown-mode' is available, it is used. Otherwise gptel\ndefaults to `text-mode'." :group gptel :type symbol gptel-prompt-prefix-alist #f(compiled-function () #<bytecode 0x19800016fe914>) "String used as a prefix to the query being sent to the LLM.\n\nThis is meant for the user to distinguish between queries and\nresponses, and is removed from the query before it is sent.\n\nThis is an alist mapping major modes to the prefix strings. This\nis only inserted in dedicated gptel buffers." (alist :key-type symbol :value-type string) gptel-response-prefix-alist #f(compiled-function () #<bytecode 0x19800016fe914>) "String inserted before the response from the LLM.\n\nThis is meant for the user to distinguish between queries and\nresponses.\n\nThis is an alist mapping major modes to the reply prefix strings. This\nis only inserted in dedicated gptel buffers before the AI's response." (alist :key-type symbol :value-type string) gptel-use-header-line #f(compiled-function () #<bytecode 0x19800016fe5d4>) "Whether `gptel-mode' should use header-line for status\ninformation.\n\nWhen set to nil, use the mode line for (minimal) status\ninformation and the echo area for messages." boolean gptel-crowdsourced-prompts-file #f(compiled-function () #<bytecode 0xc127647dd850e5d>) "File used to store crowdsourced system prompts.\n\nThese are prompts cached from an online source (see\n`gptel--crowdsourced-prompts-url'), and can be set from the\ntransient menu interface provided by `gptel-menu'." file defalias gptel--button-buttonize button-buttonize gptel--always always gptel-directives #f(compiled-function () #<bytecode 0x19800016fe914>) "System prompts (directives) for ChatGPT.\n\nThese are system instructions sent at the beginning of each\nrequest to ChatGPT.\n\nEach entry in this alist maps a symbol naming the directive to\nthe string that is sent. To set the directive for a chat session\ninteractively call `gptel-send' with a prefix argument." :safe (alist :key-type symbol :value-type string)] 10) require(gptel nil t) (not (require 'gptel nil t)) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error)) (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode function nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode function nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) ((debug error) (funcall use-package--warning422 :catch err))) (progn (defvar use-package--warning422 #'(lambda (keyword err) (let ((msg (format "%s/%s: %s" ... keyword ...))) (display-warning 'use-package msg :error)))) (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode function nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) ((debug error) (funcall use-package--warning422 :catch err)))) eval((progn (defvar use-package--warning422 #'(lambda (keyword err) (let ((msg ...)) (display-warning 'use-package msg :error)))) (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq ... custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode function nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) ((debug error) (funcall use-package--warning422 :catch err)))) nil) elisp--eval-last-sexp(nil) eval-last-sexp(nil) funcall-interactively(eval-last-sexp nil) command-execute(eval-last-sexp) — Reply to this email directly, view it on GitHub <#173>, or unsubscribe <https://github.com/notifications/unsubscribe-auth/ACBVOLFLDWVRBJLRGW5H72LYNAWD7AVCNFSM6AAAAABBOWFY72VHI2DSMVQWIX3LMV43ERDJONRXK43TNFXW4OZWGAZTEOBYHE> . You are receiving this because you are subscribed to this thread.Message ID: ***@***.***>

[ParetoOptimalDev]

Oh.. that's right I forgot the difference between the two.

However... I'm still getting an error after making that change and starting a new emacs.

Note this is in the context of my full config, I can reduce to a more minimal example like I did above shortly if needed.

Here is a traceback:

Debugger entered--Lisp error: (void-variable quote)
  eval(quote)
  custom-initialize-reset(gptel-default-mode (funcall #'#f(compiled-function () #<bytecode 0x102da82e06f8a985>)))
  custom-declare-variable(gptel-default-mode (funcall #'#f(compiled-function () #<bytecode 0x102da82e06f8a985>)) "The default major mode for dedicated chat buffers.\n\nIf `markdown-mode' is available, it is used.  Otherwise gptel\ndefaults to `text-mode'." :group gptel :type symbol)
  byte-code("\300\301\302\303\304DD\305\306\307\310\311&\7\210\300\312\302\303\313DD\314\306\307\310\315&\7\210\300\316\302\303\317DD\320\306\307\310\321&\7\210\300\322\302\303\323DD\324\310\325\306\307&\7\210\300\326\302\303\327DD\330\306\307\310\331&\7\210\332\333\334\"\210\332\335\336\"\210\300\337\302\303\340DD\341\306\307\342\335\310\343&\11\207" [custom-declare-variable gptel-default-mode funcall function #f(compiled-function () #<bytecode 0x102da82e06f8a985>) "The default major mode for dedicated chat buffers.\n\nIf `markdown-mode' is available, it is used.  Otherwise gptel\ndefaults to `text-mode'." :group gptel :type symbol gptel-prompt-prefix-alist #f(compiled-function () #<bytecode 0x19800016fe914>) "String used as a prefix to the query being sent to the LLM.\n\nThis is meant for the user to distinguish between queries and\nresponses, and is removed from the query before it is sent.\n\nThis is an alist mapping major modes to the prefix strings.  This\nis only inserted in dedicated gptel buffers." (alist :key-type symbol :value-type string) gptel-response-prefix-alist #f(compiled-function () #<bytecode 0x19800016fe914>) "String inserted before the response from the LLM.\n\nThis is meant for the user to distinguish between queries and\nresponses.\n\nThis is an alist mapping major modes to the reply prefix strings.  This\nis only inserted in dedicated gptel buffers before the AI's response." (alist :key-type symbol :value-type string) gptel-use-header-line #f(compiled-function () #<bytecode 0x19800016fe5d4>) "Whether `gptel-mode' should use header-line for status\ninformation.\n\nWhen set to nil, use the mode line for (minimal) status\ninformation and the echo area for messages." boolean gptel-crowdsourced-prompts-file #f(compiled-function () #<bytecode -0x104cec90227af1a3>) "File used to store crowdsourced system prompts.\n\nThese are prompts cached from an online source (see\n`gptel--crowdsourced-prompts-url'), and can be set from the\ntransient menu interface provided by `gptel-menu'." file defalias gptel--button-buttonize button-buttonize gptel--always always gptel-directives #f(compiled-function () #<bytecode 0x19800016fe914>) "System prompts (directives) for ChatGPT.\n\nThese are system instructions sent at the beginning of each\nrequest to ChatGPT.\n\nEach entry in this alist maps a symbol naming the directive to\nthe string that is sent.  To set the directive for a chat session\ninteractively call `gptel-send' with a prefix argument." :safe (alist :key-type symbol :value-type string)] 10)
  require(gptel nil t)
  (not (require 'gptel nil t))
  (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))
  (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode quote nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error)))
  (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode quote nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) ((debug error) (funcall use-package--warning69 :catch err)))
  load-with-code-conversion("/home/pod/.config/emacs/system.el" "/home/pod/.config/emacs/system.el" nil nil)
  load-file("/home/pod/.config/emacs/system.el")
  org-babel-load-file("/home/pod/.config/emacs/system.org")
  load-with-code-conversion("/home/pod/.config/emacs/init.el" "/home/pod/.config/emacs/init.el" t t)
  load("/home/pod/.config/emacs/init" noerror nomessage)
  startup--load-user-init-file(#f(compiled-function () #<bytecode 0x1a6d2bf8ffe78b3a>) #f(compiled-function () #<bytecode 0x4d131ce0e73b44b>) t)
  command-line()
  normal-top-level()

[karthink]

Looks like the :custom directive in use-package automatically quotes things, so it should be just org-mode then.

…

On Fri, Jan 5, 2024, 9:04 AM ParetoOptimalDev ***@***.***> wrote: Oh.. that's right I forgot the difference between the two. However... I'm still getting an error after making that change and starting a new emacs. Here is a traceback: Debugger entered--Lisp error: (void-variable quote) eval(quote) custom-initialize-reset(gptel-default-mode (funcall #'#f(compiled-function () #<bytecode 0x102da82e06f8a985>))) custom-declare-variable(gptel-default-mode (funcall #'#f(compiled-function () #<bytecode 0x102da82e06f8a985>)) "The default major mode for dedicated chat buffers.\n\nIf `markdown-mode' is available, it is used. Otherwise gptel\ndefaults to `text-mode'." :group gptel :type symbol) byte-code("\300\301\302\303\304DD\305\306\307\310\311&\7\210\300\312\302\303\313DD\314\306\307\310\315&\7\210\300\316\302\303\317DD\320\306\307\310\321&\7\210\300\322\302\303\323DD\324\310\325\306\307&\7\210\300\326\302\303\327DD\330\306\307\310\331&\7\210\332\333\334\"\210\332\335\336\"\210\300\337\302\303\340DD\341\306\307\342\335\310\343&\11\207" [custom-declare-variable gptel-default-mode funcall function #f(compiled-function () #<bytecode 0x102da82e06f8a985>) "The default major mode for dedicated chat buffers.\n\nIf `markdown-mode' is available, it is used. Otherwise gptel\ndefaults to `text-mode'." :group gptel :type symbol gptel-prompt-prefix-alist #f(compiled-function () #<bytecode 0x19800016fe914>) "String used as a prefix to the query being sent to the LLM.\n\nThis is meant for the user to distinguish between queries and\nresponses, and is removed from the query before it is sent.\n\nThis is an alist mapping major modes to the prefix strings. This\nis only inserted in dedicated gptel buffers." (alist :key-type symbol :value-type string) gptel-response-prefix-alist #f(compiled-function () #<bytecode 0x19800016fe914>) "String inserted before the response from the LLM.\n\nThis is meant for the user to distinguish between queries and\nresponses.\n\nThis is an alist mapping major modes to the reply prefix strings. This\nis only inserted in dedicated gptel buffers before the AI's response." (alist :key-type symbol :value-type string) gptel-use-header-line #f(compiled-function () #<bytecode 0x19800016fe5d4>) "Whether `gptel-mode' should use header-line for status\ninformation.\n\nWhen set to nil, use the mode line for (minimal) status\ninformation and the echo area for messages." boolean gptel-crowdsourced-prompts-file #f(compiled-function () #<bytecode -0x104cec90227af1a3>) "File used to store crowdsourced system prompts.\n\nThese are prompts cached from an online source (see\n`gptel--crowdsourced-prompts-url'), and can be set from the\ntransient menu interface provided by `gptel-menu'." file defalias gptel--button-buttonize button-buttonize gptel--always always gptel-directives #f(compiled-function () #<bytecode 0x19800016fe914>) "System prompts (directives) for ChatGPT.\n\nThese are system instructions sent at the beginning of each\nrequest to ChatGPT.\n\nEach entry in this alist maps a symbol naming the directive to\nthe string that is sent. To set the directive for a chat session\ninteractively call `gptel-send' with a prefix argument." :safe (alist :key-type symbol :value-type string)] 10) require(gptel nil t) (not (require 'gptel nil t)) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error)) (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode quote nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) (condition-case err (progn (let ((custom--inhibit-theme-enable nil)) (if (memq 'use-package custom-known-themes) nil (custom-declare-theme 'use-package 'use-package-theme nil (list)) (enable-theme 'use-package) (setq custom-enabled-themes (remq 'use-package custom-enabled-themes))) (custom-theme-set-variables 'use-package '(gptel-default-mode quote nil nil "Customized with use-package gptel"))) (if (not (require 'gptel nil t)) (display-warning 'use-package (format "Cannot load %s" 'gptel) :error))) ((debug error) (funcall use-package--warning69 :catch err))) load-with-code-conversion("/home/pod/.config/emacs/system.el" "/home/pod/.config/emacs/system.el" nil nil) load-file("/home/pod/.config/emacs/system.el") org-babel-load-file("/home/pod/.config/emacs/system.org") load-with-code-conversion("/home/pod/.config/emacs/init.el" "/home/pod/.config/emacs/init.el" t t) load("/home/pod/.config/emacs/init" noerror nomessage) startup--load-user-init-file(#f(compiled-function () #<bytecode 0x1a6d2bf8ffe78b3a>) #f(compiled-function () #<bytecode 0x4d131ce0e73b44b>) t) command-line() normal-top-level() — Reply to this email directly, view it on GitHub <#173 (reply in thread)>, or unsubscribe <https://github.com/notifications/unsubscribe-auth/ACBVOLGEIUZR3QTRREZI25TYNAXB5AVCNFSM6AAAAABBOWFY72VHI2DSMVQWIX3LMV43SRDJONRXK43TNFXW4Q3PNVWWK3TUHM4DAMRVGIYDC> . You are receiving this because you commented.Message ID: ***@***.***>

[ParetoOptimalDev]

Oh I understand the issue a little better now, but just org-mode doesn't work either. So given:

(use-package gptel
  :custom
  (gptel-default-mode . org-mode))

I now get:

Debugger entered--Lisp error: (wrong-type-argument listp org-mode)
  car(org-mode)
  #f(compiled-function (def) #<bytecode -0xca71eedeea1c2c7>)((gptel-default-mode . org-mode))
  use-package-handler/:custom(gptel :custom ((gptel-default-mode . org-mode)) (:init nil :load (gptel) :config (t)) nil)
  use-package-process-keywords(gptel (:custom ((gptel-default-mode . org-mode)) :init nil :load (gptel) :config (t)) nil)
  use-package-handler/:catch(gptel :catch t (:custom ((gptel-default-mode . org-mode)) :init nil :load (gptel) :config (t)) nil)
  use-package-process-keywords(gptel (:catch t :custom ((gptel-default-mode . org-mode)) :init nil :load (gptel) :config (t)) nil)
  #f(compiled-function (name &rest args) "Declare an Emacs package by specifying a group of configuration options.\n\nFor the full documentation, see Info node `(use-package) top'.\nUsage:\n\n  (use-package package-name\n     [:keyword [option]]...)\n\n:init            Code to run before PACKAGE-NAME has been loaded.\n:config          Code to run after PACKAGE-NAME has been loaded.  Note that\n                 if loading is deferred for any reason, this code does not\n                 execute until the lazy load has occurred.\n:preface         Code to be run before everything except `:disabled'; this\n                 can be used to define functions for use in `:if', or that\n                 should be seen by the byte-compiler.\n\n:mode            Form to be added to `auto-mode-alist'.\n:magic           Form to be added to `magic-mode-alist'.\n:magic-fallback  Form to be added to `magic-fallback-mode-alist'.\n:interpreter     Form to be added to `interpreter-mode-alist'.\n\n:commands        Define autoloads for commands that will be defined by the\n                 package.  This is useful if the package is being lazily\n                 loaded, and you wish to conditionally call functions in your\n                 `:init' block that are defined in the package.\n:autoload        Similar to :commands, but it for no-interactive one.\n:hook            Specify hook(s) to attach this package to.\n\n:bind            Bind keys, and define autoloads for the bound commands.\n:bind*           Bind keys, and define autoloads for the bound commands,\n                 *overriding all minor mode bindings*.\n:bind-keymap     Bind a key prefix to an auto-loaded keymap defined in the\n                 package.  This is like `:bind', but for keymaps.\n:bind-keymap*    Like `:bind-keymap', but overrides all minor mode bindings\n\n:defer           Defer loading of a package -- this is implied when using\n                 `:commands', `:bind', `:bind*', `:mode', `:magic', `:hook',\n                 `:magic-fallback', or `:interpreter'.  This can be an integer,\n                 to force loading after N seconds of idle time, if the package\n                 has not already been loaded.\n:demand          Prevent the automatic deferred loading introduced by constructs\n                 such as `:bind' (see `:defer' for the complete list).\n\n:after           Delay the effect of the use-package declaration\n                 until after the named libraries have loaded.\n                 Before they have been loaded, no other keyword\n                 has any effect at all, and once they have been\n                 loaded it is as if `:after' was not specified.\n\n:if EXPR         Initialize and load only if EXPR evaluates to a non-nil value.\n:disabled        The package is ignored completely if this keyword is present.\n:defines         Declare certain variables to silence the byte-compiler.\n:functions       Declare certain functions to silence the byte-compiler.\n:load-path       Add to the `load-path' before attempting to load the package.\n:diminish        Support for diminish.el (if installed).\n:delight         Support for delight.el (if installed).\n:custom          Call `Custom-set' or `set-default' with each variable\n                 definition without modifying the Emacs `custom-file'.\n                 (compare with `custom-set-variables').\n:custom-face     Call `custom-set-faces' with each face definition.\n:ensure          Loads the package using package.el if necessary.\n:pin             Pin the package to an archive." #<bytecode -0xcc62808f3339d4c>)(gptel :custom (gptel-default-mode . org-mode))
  elisp--eval-last-sexp(nil)
  eval-last-sexp(nil)
  funcall-interactively(eval-last-sexp nil)
  command-execute(eval-last-sexp)

[ParetoOptimalDev]

If it helps, I used pp-macroexpand-last-sexp on this (org-mode unquoted failed to macro expand):

(use-package gptel
  :custom
  (gptel-default-mode . 'org-mode)
  (gptel-model . '("gpt-4-1106-preview"))
  :bind ("C-x g" . 'gptel-send))

And got:

(progn
  (defvar use-package--warning130
    #'(lambda (keyword err)
	(let
	    ((msg
	      (format "%s/%s: %s" 'gptel keyword
		      (error-message-string err))))
	  (display-warning 'use-package msg :error))))
  (condition-case-unless-debug err
      (progn
	(let ((custom--inhibit-theme-enable nil))
	  (unless (memq 'use-package custom-known-themes)
	    (deftheme use-package) (enable-theme 'use-package)
	    (setq custom-enabled-themes
		  (remq 'use-package custom-enabled-themes)))
	  (custom-theme-set-variables 'use-package
				      '(gptel-default-mode quote nil
							   nil
							   "Customized with use-package gptel")
				      '(gptel-model quote nil nil
						    "Customized with use-package gptel")))
	(if (not (require 'gptel nil t))
	    (display-warning 'use-package
			     (format "Cannot load %s" 'gptel) :error))
	(bind-keys :package gptel ("C-x g" . gptel-send)))
    (error (funcall use-package--warning130 :catch err))))

[ParetoOptimalDev]

It seems like somehow macroexpand is failing with what seems to be the valid definition using :custom (gptel-default-mode . org-mode) that is unquoted.