From 1ea9947ca318979bac0cc6d54263faf3fb09d587 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 a07e1f13acf..e166a2859a4 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.2