mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-11 14:01:43 -08:00
Code Issues Projects Releases Wiki Activity

Move :preface handling within the code

Browse source
This commit is contained in:
John Wiegley 2017-12-04 09:39:54 -08:00
parent 4efd355108
commit fb9d159632
1 changed files with 11 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

22
up-core.el
View file

@ -939,17 +939,6 @@ deferred until the prefix key sequence is pressed."
(defun use-package-handler/:no-require (name keyword arg rest state)
(use-package-process-keywords name rest state))
;;;; :preface
(defalias 'use-package-normalize/:preface 'use-package-normalize-forms)
(defun use-package-handler/:preface (name keyword arg rest state)
(let ((body (use-package-process-keywords name rest state)))
(use-package-concat
(when arg
`((eval-and-compile ,@arg)))
body)))
;;;; :defines
(defalias 'use-package-normalize/:defines 'use-package-normalize-symlist)
@ -964,6 +953,17 @@ deferred until the prefix key sequence is pressed."
(defun use-package-handler/:functions (name keyword arg rest state)
(use-package-process-keywords name rest state))
;;;; :preface
(defalias 'use-package-normalize/:preface 'use-package-normalize-forms)
(defun use-package-handler/:preface (name keyword arg rest state)
(let ((body (use-package-process-keywords name rest state)))
(use-package-concat
(when arg
`((eval-and-compile ,@arg)))
body)))
;;;; :bind, :bind*
(defalias 'use-package-normalize/:bind 'use-package-normalize-binder)