extract use-package-hook-handler-flatten-mode-symbols function

This commit is contained in:
Justin Talbott 2019-06-14 19:48:25 -04:00
parent 97f0287e19
commit 8ec41be418

View file

@ -1266,9 +1266,13 @@ meaning:
(concat (symbol-name sym) (concat (symbol-name sym)
use-package-hook-name-suffix))) use-package-hook-name-suffix)))
(function ,fun))) (function ,fun)))
(if (use-package-non-nil-symbolp syms) (list syms) syms))))) (use-package-hook-handler-flatten-mode-symbols syms)))))
(use-package-normalize-commands args)))) (use-package-normalize-commands args))))
(defun use-package-hook-handler-flatten-mode-symbols (syms)
"Ensure that `SYMS' turns into a list of modes."
(if (use-package-non-nil-symbolp syms) (list syms) syms))
;;;; :commands ;;;; :commands
(defalias 'use-package-normalize/:commands 'use-package-normalize-symlist) (defalias 'use-package-normalize/:commands 'use-package-normalize-symlist)