From c4ac2ab384228f8c13eae641d7288739305af036 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 17 Jun 2022 18:58:36 +0200 Subject: [PATCH] fix: void-function doplist! in package! The macro was removed a short while ago, and I forgot to include this change with it. Amend: cb03d3258d05 --- core/core-packages.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/core/core-packages.el b/core/core-packages.el index 45758211b..2e8a93c7f 100644 --- a/core/core-packages.el +++ b/core/core-packages.el @@ -521,9 +521,9 @@ elsewhere." '((:private . modules))) nil)))) ;; Merge given plist with pre-existing one - (doplist! ((prop val) (list ,@plist) plist) - (unless (null val) - (cl-callf plist-put plist prop val))) + (cl-loop for (key value) on (list ,@plist) by 'cddr + when value + do (cl-callf plist-put plist key value)) ;; Some basic key validation; throws an error on invalid properties (condition-case e (when-let (recipe (plist-get plist :recipe))