Move :preface handling within the code

diff --git a/up-core.el b/up-core.el
index 73884196e7f17aa11a819aa1e72d3176deee8dce..6994c632ec0b674db2421e0183f35f7348caec5d 100644 (file)
--- a/up-core.el
+++ b/up-core.el
@@ -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)