bug#81601: 32.0.50; Commit 7e9e10d98422 makes Emacs emit multiple `wrong-type-argument' errors

> Cc: Stefan Monnier <[email protected]>
> From: Roi Martin <[email protected]>
> Date: Wed, 12 Aug 2026 01:36:42 +0200
> 
> The following commit makes Emacs emit multiple `wrong-type-argument'
> errors with a (until now) working init file:
> 
>   7e9e10d98422 "(custom-declare-variable): Check values previously set via setopt"
> 
> This report shows how to reproduce it with the Denote package.
> 
> Recipe to reproduce:
> 
>  1. mkdir -p /tmp/emacs-bug/
>  2. echo -e ";; -*- lexical-binding: t; -*-\\n(setopt denote-directory \"/tmp/emacs-bug/\")" > /tmp/emacs-bug/init.el
>  3. emacs --no-site-file --no-site-lisp --no-splash --no-x-resources --init-directory=/tmp/emacs-bug/
>  4. M-x package-install<RET>denote<RET>
>  5. The *Compile-Log* buffer shows the following error:
>     denote-test.el:38:11: Error: Wrong type argument: listp, "/tmp/emacs-bug/"
>  6. M-x kill-emacs
>  7. emacs --no-site-file --no-site-lisp --no-splash --no-x-resources --init-directory=/tmp/emacs-bug/
>  8. M-x denote
>  9. Denote fails to start with the following error:
>     byte-code: Wrong type argument: listp, "/tmp/emacs-bug/"
> 10. M-x denote
> 11. Denote starts normally
> 
> Backtrace:
> 
>   Debugger entered--Lisp error: (wrong-type-argument listp "/tmp/emacs-bug/")
>     custom-declare-variable(denote-directory (funcall #'#f(compiled-function () #<bytecode 0x12431d0dbc9a2e0d>)) ("/tmp/emacs-bug/elpa/denote-4.2.3/denote.elc" . 88) :group denote :safe #f(compiled-function (val) #<bytecode -0x1d66564795e079ee>) :package-version (denote . "4.1.0") :link (info-link "(denote) Maintain separate directories for notes") :type (choice (directory :tag "Single directory") (repeat :tag "List of directories" directory)))
>     byte-code("\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\311\312\313\312\314&\11\210\315\316\317\320\321DD\322\310\305\323\324\325\326\312\327\330\331&\15\210\332\333\334\306#\210\335\211\203T\0\211@\333\1N\203O\0\334\1N\204O\0\336\334\2\333\4N#\210\210A\2025\0\210\337\333\334\340#\210\315\334\317\320\341DD\342\310\305\325\343\330\344&\11\210\315\345\317\320\341DD\346\310\305\325\347\330\350&\11\210\315\351\317\320\352DD\353\310\305\323\354\325\355\330\356&\13\210\315\357\317\320\360DD\361\310\305\323\362\325\363\330\344&\13\210\315\364\317\320\365DD\366\310\305\325\367\312\370\330\371&\13\210\315\372\317\320\373DD\374\310\305\325\343\330\375&\11\210\315\376\317\320\377DD\201@\0\310\305\325\201A\0\330\201B\0&\11\210\315\201C\0\317\320\341DD\201D\0\310\305\325\326\330\344&\11\210\315\201E\0\317\320\360DD\201F\0\310\305\325\355\330\344&\11\210\315\201G\0\317\320\201H\0DD\201I\0\330\201J\0\325\363\310\305&\11\210\315\201K\0\317\320\341DD\201L\0\330\201M\0\325\201N\0\310\305&\11\210\315\201O\0\317\320\341DD\201P\0\310\305\325\201Q\0\330\344&\11\210\315\201R\0\317\320\341DD\201S\0\310\305\325\201A\0\330\201T\0&\11\207" [require seq xref dired custom-declare-group denote nil "Simple notes with an efficient file-naming scheme." :group files :link (info-link "(denote) Top") (url-link :tag "Homepage" "https://protesilaos.com/emacs/denote") custom-declare-variable denote-directory funcall function #f(compiled-function () #<bytecode 0x12431d0dbc9a2e0d>) ("/tmp/emacs-bug/elpa/denote-4.2.3/denote.elc" . 88) :safe #f(compiled-function (val) #<bytecode -0x1d66564795e079ee>) :package-version (denote . "4.1.0") (info-link "(denote) Maintain separate directories for notes") :type (choice (directory :tag "Single directory") (repeat :tag "List of directories" directory)) defvaralias denote-save-buffer-after-creation denote-save-buffers (saved-value saved-variable-comment) put make-obsolete-variable "3.0.0" #f(compiled-function () #<bytecode 0x18c000af2941>) ("/tmp/emacs-bug/elpa/denote-4.2.3/denote.elc" . 1614) (denote . "3.0.0") boolean denote-kill-buffers ("/tmp/emacs-bug/elpa/denote-4.2.3/denote.elc" . 2053) (denote . "3.1.0") (choice (const :tag "Do not kill buffers" nil) (const :tag "Kill after creation" on-creation) (const :tag "Kill after rename" on-rename) (const :tag "Kill after creation and rename" t)) denote-known-keywords #f(compiled-function () #<bytecode -0x69ef3f877d790cb>) ("/tmp/emacs-bug/elpa/denote-4.2.3/denote.elc" . 2804) listp (denote . "0.1.0") (repeat string) denote-infer-keywords #f(compiled-function () #<bytecode 0x18c000af29b1>) ("/tmp/emacs-bug/elpa/denote-4.2.3/denote.elc" . 3476) ...] 14)
>     command-execute(denote record)
>     execute-extended-command(nil "denote" "denote")
>     funcall-interactively(execute-extended-command nil "denote" "denote")
>     command-execute(execute-extended-command)

This was fixed later today, yes?