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

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

[elpa] externals/ef-themes 9999f86fef 04/10: Prefer {if, when}-let* over


From: ELPA Syncer
Subject: [elpa] externals/ef-themes 9999f86fef 04/10: Prefer {if, when}-let* over {if, when}-let
Date: Fri, 19 Aug 2022 13:57:38 -0400 (EDT)

branch: externals/ef-themes
commit 9999f86fef37a6f4a54ff43dcee5008bcca881d4
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Protesilaos Stavrou <info@protesilaos.com>

    Prefer {if,when}-let* over {if,when}-let
    
    The former do not support the obsolete single-binding syntax, and
    make clear that both macros operate more like let* than let by
    evaluating and binding variables sequentially.
---
 ef-themes.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ef-themes.el b/ef-themes.el
index c20c9581e1..57b26957c1 100644
--- a/ef-themes.el
+++ b/ef-themes.el
@@ -280,7 +280,7 @@ sequence given SEQ-PRED, using SEQ-DEFAULT as a fallback."
 
 (defun ef-themes--current-theme ()
   "Return first enabled Ef theme."
-  (when-let ((themes (ef-themes--list-enabled-themes)))
+  (when-let* ((themes (ef-themes--list-enabled-themes)))
     (car themes)))
 
 (defun ef-themes--palette (theme)
@@ -289,7 +289,7 @@ sequence given SEQ-PRED, using SEQ-DEFAULT as a fallback."
 
 (defun ef-themes--current-theme-palette ()
   "Return palette of active Ef theme, else produce `user-error'."
-  (if-let ((palette (ef-themes--palette (ef-themes--current-theme))))
+  (if-let* ((palette (ef-themes--palette (ef-themes--current-theme))))
       palette
     (user-error "No enabled Ef theme could be found")))
 
@@ -328,7 +328,7 @@ When called from Lisp, THEME is a symbol."
 (defun ef-themes-toggle ()
   "Toggle between the two `ef-themes-to-toggle'."
   (interactive)
-  (when-let ((themes (ef-themes--toggle-theme-p))
+  (when-let* ((themes (ef-themes--toggle-theme-p))
              (one (car themes))
              (two (cadr themes)))
     (unless (eq (length themes) 2)



reply via email to

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