diff options
| author | Stefan Kangas <stefankangas@gmail.com> | 2024-10-02 11:53:30 +0200 |
|---|---|---|
| committer | Stefan Kangas <stefankangas@gmail.com> | 2024-10-02 12:03:45 +0200 |
| commit | 67e807d897077b7c982104b528e2504591214a29 (patch) | |
| tree | 5e719a350dd8af43ae5bd0c1bb11966f2aa7b3c2 /lisp/emacs-lisp | |
| parent | 9e51815265b9837a8311ee28af39e6b78dd18e29 (diff) | |
| download | emacs-67e807d897077b7c982104b528e2504591214a29.tar.gz emacs-67e807d897077b7c982104b528e2504591214a29.tar.bz2 emacs-67e807d897077b7c982104b528e2504591214a29.zip | |
; Fix thinko in my last change
* lisp/emacs-lisp/bytecomp.el (bytecomp--custom-declare): Fix thinko.
* test/lisp/emacs-lisp/bytecomp-tests.el
(bytecomp-test-defcustom-local): Update test.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/bytecomp.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/bytecomp.el b/lisp/emacs-lisp/bytecomp.el index 72953502f51..29e7882c851 100644 --- a/lisp/emacs-lisp/bytecomp.el +++ b/lisp/emacs-lisp/bytecomp.el @@ -5472,7 +5472,7 @@ FORM is used to provide location, `bytecomp--cus-function' and ;; Check :local (when-let ((val (and (eq fun 'custom-declare-variable) (plist-get keyword-args :local))) - (_ (not (memq val '(t permanent permanent-only))))) + (_ (not (member val '(t 'permanent 'permanent-only))))) (bytecomp--cus-warn form ":local keyword does not accept %S" val)))) (byte-compile-normal-call form)) |