[Emacs-diffs] feature/gnus-select b4377a3 164/218: Handle possible classtype values in eieio-persistent-read

[Andrew G Cohen]

branch: feature/gnus-select
commit b4377a34330b3fa5d1ff3762d4277c8bd4f2ca11
Author: Eric Abrahamsen <address@hidden>
Commit: Andrew G Cohen <address@hidden>

    Handle possible classtype values in eieio-persistent-read
    
    * lisp/emacs-lisp/eieio-base.el (eieio-persistent-validate/fix-slot-value):
      The function `eieio-persistent-slot-type-is-class-p' could return
      either a single class, or a list of classes.
---
 lisp/emacs-lisp/eieio-base.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/eieio-base.el b/lisp/emacs-lisp/eieio-base.el
index c0ad7ac..adc53e3 100644
--- a/lisp/emacs-lisp/eieio-base.el
+++ b/lisp/emacs-lisp/eieio-base.el
@@ -349,7 +349,7 @@ Second, any text properties will be stripped from strings."
                        (seq-some
                         (lambda (elt)
                           (child-of-class-p (car proposed-value) elt))
-                        classtype))
+                        (if (listp classtype) classtype (list classtype))))
                  (eieio-persistent-convert-list-to-object
                   proposed-value))
                 (t