emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/setup 4e7d097 1/4: Fix context-sensitive hook names


From: ELPA Syncer
Subject: [elpa] externals/setup 4e7d097 1/4: Fix context-sensitive hook names
Date: Sat, 24 Jul 2021 10:57:15 -0400 (EDT)

branch: externals/setup
commit 4e7d0979d03e46254b40789d8315a8302c51e5fc
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Fix context-sensitive hook names
---
 setup.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/setup.el b/setup.el
index 304c96a..692db85 100644
--- a/setup.el
+++ b/setup.el
@@ -299,7 +299,7 @@ and VAL into one s-expression."
                                  (intern (format "%s-mode" feature))))
                          (setup-opts `((feature . ,feature)
                                        (mode . ,mode)
-                                       (hook . ,(intern (format "%s-mode" 
mode)))
+                                       (hook . ,(intern (format "%s-hook" 
mode)))
                                        (map . ,(intern (format "%s-map" mode)))
                                        ,@setup-opts)))
                     (setup-expand body))
@@ -318,7 +318,7 @@ If FEATURE is a list, apply BODY to all elements of 
FEATURE."
     (let (bodies)
       (dolist (mode (if (listp modes) modes (list modes)))
         (push (let ((setup-opts `((mode . ,mode)
-                                  (hook . ,(intern (format "%s-mode" mode)))
+                                  (hook . ,(intern (format "%s-hook" mode)))
                                   (map . ,(intern (format "%s-map" mode)))
                                   ,@setup-opts)))
                 (setup-expand body))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]