From 40ad1ff327616721ce060ea774631b54e3ba26ca Mon Sep 17 00:00:00 2001 From: Eric Abrahamsen Date: Tue, 19 Dec 2017 14:56:13 -0800 Subject: [PATCH] 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 f0fed17b7da..af240794e38 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 -- 2.39.5