[elpa] externals/ef-themes 8448e1fc16 254/281: Move helper function further up in the outline

[ELPA Syncer]

branch: externals/ef-themes
commit 8448e1fc16108c97c7cfecff4de32626946dd080
Author: Protesilaos Stavrou <info@protesilaos.com>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Move helper function further up in the outline
---
 ef-themes.el | 18 +++++++++---------
 1 file changed, 9 insertions(+), 9 deletions(-)

diff --git a/ef-themes.el b/ef-themes.el
index ea8acb3376..fb72c67900 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -63,6 +63,15 @@
      (string-prefix-p "ef-" (symbol-name theme)))
    custom-known-themes))
 
+(defun ef-themes--current-theme-palette ()
+  "Return palette of active Ef theme, else produce `user-error'."
+  (if-let* ((themes (ef-themes--list-enabled-themes))
+            (palette (intern
+                      (format "%s-palette"
+                              (car themes)))))
+      palette
+    (user-error "No enabled Ef theme could be found")))
+
 (defvar ef-themes--select-theme-history nil)
 
 (defun ef-themes--select-prompt ()
@@ -939,15 +948,6 @@ Those are stored in `ef-themes-faces' and
 
 ;;; Use theme colors
 
-(defun ef-themes--current-theme-palette ()
-  "Return palette of active Ef theme, else produce `user-error'."
-  (if-let* ((themes (ef-themes--list-enabled-themes))
-            (palette (intern
-                      (format "%s-palette"
-                              (car themes)))))
-      palette
-    (user-error "No enabled Ef theme could be found")))
-
 (defmacro ef-themes-with-colors (&rest body)
   "Evaluate BODY with colors from current palette bound."
   (declare (indent 0))