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

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

[nongnu] elpa/autothemer 523a0994e5 07/21: Rename defautotheme to defthe


From: ELPA Syncer
Subject: [nongnu] elpa/autothemer 523a0994e5 07/21: Rename defautotheme to deftheme
Date: Thu, 6 Jan 2022 02:58:09 -0500 (EST)

branch: elpa/autothemer
commit 523a0994e5607f492985df7cdc0abe1d802ca4c2
Author: Sebastian Sturm <sturm@itp.uni-leipzig.de>
Commit: Sebastian Sturm <sturm@itp.uni-leipzig.de>

    Rename defautotheme to deftheme
---
 autothemer.el | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/autothemer.el b/autothemer.el
index 844f14c5e8..53182accd4 100644
--- a/autothemer.el
+++ b/autothemer.el
@@ -24,7 +24,7 @@
 (defvar autothemer--current-theme nil
   "Internal variable of type `autothemer--theme' used by autothemer.
 Contains the color palette and the list of faces most recently
-customized using `autothemer-defautotheme'.")
+customized using `autothemer-deftheme'.")
 
 (defun autothemer--reduced-spec-to-facespec (display reduced-specs)
   "Create a face spec for DISPLAY, with specs REDUCED-SPECS.
@@ -47,7 +47,7 @@ E.g., (a (b c d) e (f g)) -> (list a (list b c d) e (list f 
g))."
     expr))
 
 ;;;###autoload
-(defmacro autothemer-defautotheme (name description palette reduced-specs 
&rest body)
+(defmacro autothemer-deftheme (name description palette reduced-specs &rest 
body)
   "Define a theme NAME with description DESCRIPTION.
 A color PALETTE can be used to define let*-like
 bindings within both the REDUCED-SPECS and the BODY."
@@ -130,7 +130,7 @@ of `autothemer--color' structs."
   "Find uncustomized faces.
 Iterate through all currently defined faces and return those that
 were left uncustomized by the most recent call to
-`autothemer-defautotheme'."
+`autothemer-deftheme'."
   (let ((all-faces (face-list))
         (themed-faces (autothemer--theme-defined-faces 
autothemer--current-theme)))
     (--filter (not (-contains? themed-faces it)) all-faces)))
@@ -211,10 +211,10 @@ unbound symbols, such as `normal' or `demibold'."
   "Autogenerate customizations for all unthemed faces.
 Iterate through all currently defined faces, select those that
 have been left uncustomized by the most recent call to
-`autothemer-defautotheme' and generate customizations that best
+`autothemer-deftheme' and generate customizations that best
 approximate the faces' current definitions using the color
 palette used in the most recent invocation of
-`autothemer-defautotheme'."
+`autothemer-deftheme'."
   (interactive)
   (let* ((missing-faces (autothemer--unthemed-faces))
          (templates (--map (autothemer--approximate-spec



reply via email to

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