From f3faa1a13fb3c1661ce4027630f2f7bb566fefef Mon Sep 17 00:00:00 2001 From: MORIOKA Tomohiko Date: Tue, 13 Sep 2016 17:09:56 +0900 Subject: [PATCH] (est-eval-value-as-created-works): Fix problem when some items of value are omitted. --- est-eval.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/est-eval.el b/est-eval.el index d327070..25b8042 100644 --- a/est-eval.el +++ b/est-eval.el @@ -692,9 +692,11 @@ '(:subtype unordered-list) '(:separator " ")) (mapcar (lambda (creator) - (est-eval-list - '((value (:feature <-creator))) - creator nil)) + (if (concord-object-p creator) + (est-eval-list + '((value (:feature <-creator))) + creator nil) + (est-eval-value-default creator))) value)) (est-eval-value-default value))) -- 1.7.10.4