diff options
| author | Troy Hinckley <t.macman@gmail.com> | 2019-07-16 08:29:09 -0700 |
|---|---|---|
| committer | Troy Hinckley <t.macman@gmail.com> | 2021-05-17 15:34:26 -0600 |
| commit | 24c50da3b272f571c320ef800a80c0bc0ce38e28 (patch) | |
| tree | b82c3e81f306551999264a7e29bc4647a3530aa8 /lisp/use-package/use-package-core.el | |
| parent | ffa5f0397af87c7258f58082408281bf3a5a2deb (diff) | |
| download | emacs-24c50da3b272f571c320ef800a80c0bc0ce38e28.tar.gz emacs-24c50da3b272f571c320ef800a80c0bc0ce38e28.tar.bz2 emacs-24c50da3b272f571c320ef800a80c0bc0ce38e28.zip | |
Auto detect mode suffix in hook keyword
Diffstat (limited to 'lisp/use-package/use-package-core.el')
| -rw-r--r-- | lisp/use-package/use-package-core.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/use-package/use-package-core.el b/lisp/use-package/use-package-core.el index 28bc5a50ed0..a82e7b145c7 100644 --- a/lisp/use-package/use-package-core.el +++ b/lisp/use-package/use-package-core.el @@ -1264,7 +1264,10 @@ meaning: (setq every nil))) every)))) #'use-package-recognize-function - name label arg)))) + (if (string-suffix-p "-mode" (symbol-name name)) + name + (intern (concat (symbol-name name) "-mode"))) + label arg)))) (defalias 'use-package-autoloads/:hook 'use-package-autoloads-mode) |