From 16d3f75f1d89bb58233ed4d3aabb54a18f332032 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Sat, 23 Jun 2018 19:29:29 +0200 Subject: [PATCH] Minor refactor of use-package-handler/:after-call + Duplicate hooks aren't a problem + letbind `fn` only when we need it --- core/core-modules.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/core/core-modules.el b/core/core-modules.el index c320b0216..eabea6b74 100644 --- a/core/core-modules.el +++ b/core/core-modules.el @@ -190,10 +190,9 @@ non-nil, return paths of possible modules, activated or otherwise." (defalias 'use-package-normalize/:after-call 'use-package-normalize-symlist) (defun use-package-handler/:after-call (name _keyword hooks rest state) - (let ((fn (intern (format "doom|transient-hook--load-%s" name))) - (hooks (delete-dups hooks))) - (if (plist-get state :demand) - (use-package-process-keywords name rest state) + (if (plist-get state :demand) + (use-package-process-keywords name rest state) + (let ((fn (intern (format "doom|transient-hook--load-%s" name)))) (use-package-concat `((fset ',fn (lambda (&rest _)