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

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

[elpa] externals/ef-themes a4c653e587 2/2: Simplify ef-themes--current-t


From: ELPA Syncer
Subject: [elpa] externals/ef-themes a4c653e587 2/2: Simplify ef-themes--current-theme
Date: Wed, 31 Aug 2022 03:57:36 -0400 (EDT)

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

    Simplify ef-themes--current-theme
    
    Thanks to Jonas Collberg for the feedback in issue 12 over at the GitHub
    mirror: <https://github.com/protesilaos/ef-themes/issues/12>.
---
 ef-themes.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/ef-themes.el b/ef-themes.el
index 3e8bf841e2..d5347a2b9c 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -320,9 +320,7 @@ sequence given SEQ-PRED, using SEQ-DEFAULT as a fallback."
 (defun ef-themes--current-theme ()
   "Return first enabled Ef theme."
   (when-let* ((theme (car (ef-themes--list-enabled-themes))))
-    (if (memq theme (ef-themes--list-enabled-themes))
-        theme
-      (user-error "`%s' is not an Ef theme" theme))))
+    theme))
 
 (defun ef-themes--palette (theme)
   "Return THEME palette as a symbol."



reply via email to

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