emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/ef-themes e8f7a8adca 250/281: Reorder code that adds th


From: ELPA Syncer
Subject: [elpa] externals/ef-themes e8f7a8adca 250/281: Reorder code that adds themes to path
Date: Tue, 16 Aug 2022 16:58:38 -0400 (EDT)

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

    Reorder code that adds themes to path
---
 ef-themes.el | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/ef-themes.el b/ef-themes.el
index 869a493ec3..3373b13141 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -938,12 +938,6 @@ Those are stored in `ef-themes-faces' and
        (custom-theme-set-faces ',name ,@ef-themes-faces)
        (custom-theme-set-variables ',name ,@ef-themes-custom-variables))))
 
-;;;###autoload
-(when load-file-name
-  (let ((dir (file-name-directory load-file-name)))
-    (unless (equal dir (expand-file-name "themes/" data-directory))
-      (add-to-list 'custom-theme-load-path dir))))
-
 ;;; Use theme colors
 
 (defmacro ef-themes-with-colors (&rest body)
@@ -966,5 +960,13 @@ Those are stored in `ef-themes-faces' and
        (ignore c ,@colors)            ; Silence unused variable warnings
        ,@body)))
 
+;;; Add to path
+
+;;;###autoload
+(when load-file-name
+  (let ((dir (file-name-directory load-file-name)))
+    (unless (equal dir (expand-file-name "themes/" data-directory))
+      (add-to-list 'custom-theme-load-path dir))))
+
 (provide 'ef-themes)
 ;;; ef-themes.el ends here



reply via email to

[Prev in Thread] Current Thread [Next in Thread]