From: Yury Kholodkov <yurykholodkov@gmail.com>
Date: Mon, 15 Aug 2022 07:36:06 +0000 (+0200)
Subject: Fix variable types in warnings-suppress
X-Git-Tag: emacs-29.0.90~1447^2~140
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d5ee49c25c8f59ab17c40eebdf38a769c2f5588b;p=emacs.git

Fix variable types in warnings-suppress

* lisp/emacs-lisp/warnings.el (warnings-suppress): The type of
these user options is a list of lists of symbols, not a list of
symbols (bug#57183).

Copyright-paperwork-exempt: yes
---

diff --git a/lisp/emacs-lisp/warnings.el b/lisp/emacs-lisp/warnings.el
index d60eedbc9cd..3a966957ec5 100644
--- a/lisp/emacs-lisp/warnings.el
+++ b/lisp/emacs-lisp/warnings.el
@@ -220,10 +220,10 @@ SUPPRESS-LIST is the list of kinds of warnings to suppress."
              (?q "quit and do nothing"))))
     (?y
      (customize-save-variable 'warning-suppress-log-types
-                              (cons type warning-suppress-log-types)))
+                              (cons (list type) warning-suppress-log-types)))
     (?n
      (customize-save-variable 'warning-suppress-types
-                              (cons type warning-suppress-types)))
+                              (cons (list type) warning-suppress-types)))
     (_ (message "Exiting"))))
 
 ;;;###autoload