branch: externals/setup
commit 9433a3a00f6d36975478d41365ec9428ed176737
Author: Philip Kaludercic <[email protected]>
Commit: Philip Kaludercic <[email protected]>
Allow :when-loaded to handle multiple expressions
---
setup.el | 7 +++++--
1 file changed, 5 insertions(+), 2 deletions(-)
diff --git a/setup.el b/setup.el
index 8338770..e3cb36c 100644
--- a/setup.el
+++ b/setup.el
@@ -585,13 +585,16 @@ If PATH does not exist, abort the evaluation."
:debug '(form)
:repeatable t)
-(setup-define :when-loaded #'identity
+(setup-define :when-loaded
+ (lambda (&rest body)
+ (macroexp-progn body))
:documentation "Evaluate BODY after the current feature has been loaded.
Avoid using this macro whenever possible, and
instead choose a more specialized alternative or write one
yourself."
:debug '(setup)
- :after-loaded t)
+ :after-loaded t
+ :indent 0)
(setup-define :without-error-demotion
(lambda ()
