1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-04 19:10:37 -08:00

Add :preface, occurring before everything except :disabled

This can be used to establish function and variable definitions that
will 1) make the byte-compiler happy (it won't complain about functions
whose definitions are unknown because you have them within a guard
block), and 2) allow you to define code that can be used in an `:if`
test.
This commit is contained in:
John Wiegley 2015-03-15 02:22:17 -05:00
parent b4a00d2eb5
commit f637380fed

View file

@ -259,7 +259,7 @@ then the expanded macros do their job silently."
(use-package-as-one (symbol-name head) args
(apply-partially #'use-package-normalize-diminish name-symbol)))
((or :init :config :idle)
((or :preface :init :config :idle)
(use-package-normalize-form (symbol-name head) args))
(:idle-priority
@ -363,6 +363,8 @@ then the expanded macros do their job silently."
;; Return the main body of the macro
(use-package-cat-maybes
(list (plist-get args :preface))
;; Setup the load-path
(mapcar #'(lambda (path) `(add-to-list 'load-path ,path))
(plist-get args :load-path))