Fix #4777: wrong-type-argument listp unpin error

This commit is contained in:
Henrik Lissner 2021-03-11 10:56:29 -05:00
parent cdcdde3354
commit abec86310b

View file

@ -192,7 +192,7 @@ ready to be pasted in a bug report on github."
"package!")) "package!"))
(error (format "<%S>" e))) (error (format "<%S>" e)))
'("n/a"))) '("n/a")))
,@(when-let (unpins (condition-case e ,(when-let (unpins (condition-case e
(mapcan #'identity (mapcan #'identity
(mapcar (mapcar
#'cdr (doom--collect-forms-in #'cdr (doom--collect-forms-in