[elpa] externals/ef-themes 559de2d160: Expand 'deftheme' with metadata

[ELPA Syncer]

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

    Expand 'deftheme' with metadata
    
    This is to support new features in Emacs where themes can specify
    the set they belong to, as well as whether they are light or dark.
    The built-in command is 'theme-choose-variant'.
    
    This is in response to Emacs bug#65468:
    <https://debbugs.gnu.org/cgi/bugreport.cgi?bug=65468>.  Thanks to
    Mauro Aranda for bringing this matter to my attention.
---
 ef-autumn-theme.el             | 9 +++++----
 ef-bio-theme.el                | 9 +++++----
 ef-cherie-theme.el             | 9 +++++----
 ef-cyprus-theme.el             | 9 +++++----
 ef-dark-theme.el               | 9 +++++----
 ef-day-theme.el                | 9 +++++----
 ef-deuteranopia-dark-theme.el  | 9 +++++----
 ef-deuteranopia-light-theme.el | 9 +++++----
 ef-duo-dark-theme.el           | 9 +++++----
 ef-duo-light-theme.el          | 9 +++++----
 ef-elea-dark-theme.el          | 9 +++++----
 ef-elea-light-theme.el         | 9 +++++----
 ef-frost-theme.el              | 9 +++++----
 ef-kassio-theme.el             | 9 +++++----
 ef-light-theme.el              | 9 +++++----
 ef-maris-dark-theme.el         | 9 +++++----
 ef-maris-light-theme.el        | 9 +++++----
 ef-night-theme.el              | 9 +++++----
 ef-spring-theme.el             | 9 +++++----
 ef-summer-theme.el             | 9 +++++----
 ef-symbiosis-theme.el          | 9 +++++----
 ef-trio-dark-theme.el          | 9 +++++----
 ef-trio-light-theme.el         | 9 +++++----
 ef-tritanopia-dark-theme.el    | 9 +++++----
 ef-tritanopia-light-theme.el   | 9 +++++----
 ef-winter-theme.el             | 9 +++++----
 26 files changed, 130 insertions(+), 104 deletions(-)

diff --git a/ef-autumn-theme.el b/ef-autumn-theme.el
index e8a0f769b8..7f089d6fa6 100644
--- a/ef-autumn-theme.el
+++ b/ef-autumn-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-autumn
-    "Legible dark theme with warm, varied colors (red, yellow, green, teal).")
+    "Legible dark theme with warm, varied colors (red, yellow, green, teal)."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-autumn-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-autumn))
 
-;;;###theme-autoload
-(put 'ef-autumn 'theme-properties '(:background-mode dark :kind color-scheme 
:family ef))
-
 ;;; ef-autumn-theme.el ends here
diff --git a/ef-bio-theme.el b/ef-bio-theme.el
index 9d82d53c13..d99be1d3c3 100644
--- a/ef-bio-theme.el
+++ b/ef-bio-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-bio
-    "Legible dark theme with green, teal, blue, purple colors.")
+    "Legible dark theme with green, teal, blue, purple colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-bio-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-bio))
 
-;;;###theme-autoload
-(put 'ef-bio 'theme-properties '(:background-mode dark :kind color-scheme 
:family ef))
-
 ;;; ef-bio-theme.el ends here
diff --git a/ef-cherie-theme.el b/ef-cherie-theme.el
index 18f69e0876..60228234ed 100644
--- a/ef-cherie-theme.el
+++ b/ef-cherie-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-cherie
-    "Legible dark theme with warm colors (mostly pink, magenta, gold)")
+    "Legible dark theme with warm colors (mostly pink, magenta, gold)"
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-cherie-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-cherie))
 
-;;;###theme-autoload
-(put 'ef-cherie 'theme-properties '(:background-mode dark :kind color-scheme 
:family ef))
-
 ;;; ef-cherie-theme.el ends here
diff --git a/ef-cyprus-theme.el b/ef-cyprus-theme.el
index 6cde58eb3a..ba55ab0a57 100644
--- a/ef-cyprus-theme.el
+++ b/ef-cyprus-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-cyprus
-    "Legible light theme with green, yellow, teal, red colors.")
+    "Legible light theme with green, yellow, teal, red colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-cyprus-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-cyprus))
 
-;;;###theme-autoload
-(put 'ef-cyprus 'theme-properties '(:background-mode light :kind color-scheme 
:family ef))
-
 ;;; ef-cyprus-theme.el ends here
diff --git a/ef-dark-theme.el b/ef-dark-theme.el
index 226b52afeb..2ab7ec9f73 100644
--- a/ef-dark-theme.el
+++ b/ef-dark-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-dark
-    "Legible dark theme with blue, magenta, cyan, purple colors.")
+    "Legible dark theme with blue, magenta, cyan, purple colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-dark-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-dark))
 
-;;;###theme-autoload
-(put 'ef-dark 'theme-properties '(:background-mode dark :kind color-scheme 
:family ef))
-
 ;;; ef-dark-theme.el ends here
diff --git a/ef-day-theme.el b/ef-day-theme.el
index 894f2b8523..bc88617624 100644
--- a/ef-day-theme.el
+++ b/ef-day-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-day
-    "Legible light theme with warm, varied colors (yellow, red, green, 
purple).")
+    "Legible light theme with warm, varied colors (yellow, red, green, 
purple)."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-day-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-day))
 
-;;;###theme-autoload
-(put 'ef-day 'theme-properties '(:background-mode light :kind color-scheme 
:family ef))
-
 ;;; ef-day-theme.el ends here
diff --git a/ef-deuteranopia-dark-theme.el b/ef-deuteranopia-dark-theme.el
index 93a1295709..101f620990 100644
--- a/ef-deuteranopia-dark-theme.el
+++ b/ef-deuteranopia-dark-theme.el
@@ -40,8 +40,12 @@
   ;; Most of the colors here, like the red and green hues, are defined
   ;; simply to preserve compatibility with the rest of the project.  We
   ;; don't actually rely on them for anything critical.
+;;;###theme-autoload
   (deftheme ef-deuteranopia-dark
-    "Legible dark theme, optimized for red-green color deficiency.")
+    "Legible dark theme, optimized for red-green color deficiency."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-deuteranopia-dark-palette
     '(
@@ -290,7 +294,4 @@ further details)."
 
   (provide-theme 'ef-deuteranopia-dark))
 
-;;;###theme-autoload
-(put 'ef-deuteranopia-dark 'theme-properties '(:background-mode dark :kind 
color-scheme :family ef))
-
 ;;; ef-deuteranopia-dark-theme.el ends here
diff --git a/ef-deuteranopia-light-theme.el b/ef-deuteranopia-light-theme.el
index bc816aeca8..49ec7623e1 100644
--- a/ef-deuteranopia-light-theme.el
+++ b/ef-deuteranopia-light-theme.el
@@ -40,8 +40,12 @@
   ;; Most of the colors here, like the red and green hues, are defined
   ;; simply to preserve compatibility with the rest of the project.  We
   ;; don't actually rely on them for anything critical.
+;;;###theme-autoload
   (deftheme ef-deuteranopia-light
-    "Legible light theme, optimized for red-green color deficiency.")
+    "Legible light theme, optimized for red-green color deficiency."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-deuteranopia-light-palette
     '(
@@ -290,7 +294,4 @@ further details)."
 
   (provide-theme 'ef-deuteranopia-light))
 
-;;;###theme-autoload
-(put 'ef-deuteranopia-light 'theme-properties '(:background-mode light :kind 
color-scheme :family ef))
-
 ;;; ef-deuteranopia-light-theme.el ends here
diff --git a/ef-duo-dark-theme.el b/ef-duo-dark-theme.el
index 5448d02705..c1886e1025 100644
--- a/ef-duo-dark-theme.el
+++ b/ef-duo-dark-theme.el
@@ -40,8 +40,12 @@
   ;; Most of the colors here are defined simply to preserve
   ;; compatibility with the rest of the project.  We don't actually rely
   ;; on them for anything critical.
+;;;###theme-autoload
   (deftheme ef-duo-dark
-    "Legible dark theme with mostly blue and orange colors.")
+    "Legible dark theme with mostly blue and orange colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-duo-dark-palette
     '(
@@ -290,7 +294,4 @@ further details)."
 
   (provide-theme 'ef-duo-dark))
 
-;;;###theme-autoload
-(put 'ef-duo-dark 'theme-properties '(:background-mode dark :kind color-scheme 
:family ef))
-
 ;;; ef-duo-dark-theme.el ends here
diff --git a/ef-duo-light-theme.el b/ef-duo-light-theme.el
index 550ce1ec90..72eae99623 100644
--- a/ef-duo-light-theme.el
+++ b/ef-duo-light-theme.el
@@ -40,8 +40,12 @@
   ;; Most of the colors here are defined simply to preserve
   ;; compatibility with the rest of the project.  We don't actually rely
   ;; on them for anything critical.
+;;;###theme-autoload
   (deftheme ef-duo-light
-    "Legible light theme with mostly blue and yellow colors.")
+    "Legible light theme with mostly blue and yellow colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-duo-light-palette
     '(
@@ -290,7 +294,4 @@ further details)."
 
   (provide-theme 'ef-duo-light))
 
-;;;###theme-autoload
-(put 'ef-duo-light 'theme-properties '(:background-mode light :kind 
color-scheme :family ef))
-
 ;;; ef-duo-light-theme.el ends here
diff --git a/ef-elea-dark-theme.el b/ef-elea-dark-theme.el
index 680988121c..0d00f9e26e 100644
--- a/ef-elea-dark-theme.el
+++ b/ef-elea-dark-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-elea-dark
-    "Legible dark theme with brown, magenta, and green colors.")
+    "Legible dark theme with brown, magenta, and green colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-elea-dark-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-elea-dark))
 
-;;;###theme-autoload
-(put 'ef-elea-dark 'theme-properties '(:background-mode dark :kind 
color-scheme :family ef))
-
 ;;; ef-elea-dark-theme.el ends here
diff --git a/ef-elea-light-theme.el b/ef-elea-light-theme.el
index 8ea8474cb7..83ac140bad 100644
--- a/ef-elea-light-theme.el
+++ b/ef-elea-light-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-elea-light
-    "Legible light theme with brown, magenta, and green colors.")
+    "Legible light theme with brown, magenta, and green colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-elea-light-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-elea-light))
 
-;;;###theme-autoload
-(put 'ef-elea-light 'theme-properties '(:background-mode light :kind 
color-scheme :family ef))
-
 ;;; ef-elea-light-theme.el ends here
diff --git a/ef-frost-theme.el b/ef-frost-theme.el
index 2e5b777065..980fee3fda 100644
--- a/ef-frost-theme.el
+++ b/ef-frost-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-frost
-    "Legible light theme with blue, cyan, teal, purple colors.")
+    "Legible light theme with blue, cyan, teal, purple colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-frost-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-frost))
 
-;;;###theme-autoload
-(put 'ef-frost 'theme-properties '(:background-mode light :kind color-scheme 
:family ef))
-
 ;;; ef-frost-theme.el ends here
diff --git a/ef-kassio-theme.el b/ef-kassio-theme.el
index e58606a7c5..c018dfca43 100644
--- a/ef-kassio-theme.el
+++ b/ef-kassio-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-kassio
-    "Legible light theme with blue, red, magenta, and earthly colors.")
+    "Legible light theme with blue, red, magenta, and earthly colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-kassio-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-kassio))
 
-;;;###theme-autoload
-(put 'ef-kassio 'theme-properties '(:background-mode light :kind color-scheme 
:family ef))
-
 ;;; ef-kassio-theme.el ends here
diff --git a/ef-light-theme.el b/ef-light-theme.el
index 0fff90a248..033f2cb154 100644
--- a/ef-light-theme.el
+++ b/ef-light-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-light
-    "Legible light theme with blue, magenta, cyan, purple colors.")
+    "Legible light theme with blue, magenta, cyan, purple colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-light-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-light))
 
-;;;###theme-autoload
-(put 'ef-light 'theme-properties '(:background-mode light :kind color-scheme 
:family ef))
-
 ;;; ef-light-theme.el ends here
diff --git a/ef-maris-dark-theme.el b/ef-maris-dark-theme.el
index 51f3958968..c7f66f96ed 100644
--- a/ef-maris-dark-theme.el
+++ b/ef-maris-dark-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-maris-dark
-    "Legible dark theme with blue, cyan, and green colors.")
+    "Legible dark theme with blue, cyan, and green colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-maris-dark-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-maris-dark))
 
-;;;###theme-autoload
-(put 'ef-maris-dark 'theme-properties '(:background-mode dark :kind 
color-scheme :family ef))
-
 ;;; ef-maris-dark-theme.el ends here
diff --git a/ef-maris-light-theme.el b/ef-maris-light-theme.el
index b8175634a9..5145a9eecf 100644
--- a/ef-maris-light-theme.el
+++ b/ef-maris-light-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-maris-light
-    "Legible light theme with blue, cyan, and green colors.")
+    "Legible light theme with blue, cyan, and green colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-maris-light-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-maris-light))
 
-;;;###theme-autoload
-(put 'ef-maris-light 'theme-properties '(:background-mode light :kind 
color-scheme :family ef))
-
 ;;; ef-maris-light-theme.el ends here
diff --git a/ef-night-theme.el b/ef-night-theme.el
index fcb4ff6c54..74f2b10dc3 100644
--- a/ef-night-theme.el
+++ b/ef-night-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-night
-    "Legible dark theme with mostly green, blue, purple colors.")
+    "Legible dark theme with mostly green, blue, purple colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-night-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-night))
 
-;;;###theme-autoload
-(put 'ef-night 'theme-properties '(:background-mode dark :kind color-scheme 
:family ef))
-
 ;;; ef-night-theme.el ends here
diff --git a/ef-spring-theme.el b/ef-spring-theme.el
index 8290db2931..3c0da87f82 100644
--- a/ef-spring-theme.el
+++ b/ef-spring-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-spring
-    "Legible light theme with cool, varied colors (green, cyan, red).")
+    "Legible light theme with cool, varied colors (green, cyan, red)."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-spring-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-spring))
 
-;;;###theme-autoload
-(put 'ef-spring 'theme-properties '(:background-mode light :kind color-scheme 
:family ef))
-
 ;;; ef-spring-theme.el ends here
diff --git a/ef-summer-theme.el b/ef-summer-theme.el
index 3be0211822..0d5d4caa71 100644
--- a/ef-summer-theme.el
+++ b/ef-summer-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-summer
-    "Legible light theme with magenta, purple, gold, cyan colors.")
+    "Legible light theme with magenta, purple, gold, cyan colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-summer-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-summer))
 
-;;;###theme-autoload
-(put 'ef-summer 'theme-properties '(:background-mode light :kind color-scheme 
:family ef))
-
 ;;; ef-summer-theme.el ends here
diff --git a/ef-symbiosis-theme.el b/ef-symbiosis-theme.el
index 311d97df1f..77032a7646 100644
--- a/ef-symbiosis-theme.el
+++ b/ef-symbiosis-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-symbiosis
-    "Legible dark theme with blue, magenta, cyan, purple colors.")
+    "Legible dark theme with blue, magenta, cyan, purple colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-symbiosis-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-symbiosis))
 
-;;;###theme-autoload
-(put 'ef-symbiosis 'theme-properties '(:background-mode dark :kind 
color-scheme :family ef))
-
 ;;; ef-symbiosis-theme.el ends here
diff --git a/ef-trio-dark-theme.el b/ef-trio-dark-theme.el
index 8116153e5b..054c1b816e 100644
--- a/ef-trio-dark-theme.el
+++ b/ef-trio-dark-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-trio-dark
-    "Legible dark theme with magenta, blue, teal colors.")
+    "Legible dark theme with magenta, blue, teal colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-trio-dark-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-trio-dark))
 
-;;;###theme-autoload
-(put 'ef-trio-dark 'theme-properties '(:background-mode dark :kind 
color-scheme :family ef))
-
 ;;; ef-trio-dark-theme.el ends here
diff --git a/ef-trio-light-theme.el b/ef-trio-light-theme.el
index 9d4446f615..a2ce3689fe 100644
--- a/ef-trio-light-theme.el
+++ b/ef-trio-light-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-trio-light
-    "Legible light theme with magenta, blue, and teal colors.")
+    "Legible light theme with magenta, blue, and teal colors."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-trio-light-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-trio-light))
 
-;;;###theme-autoload
-(put 'ef-trio-light 'theme-properties '(:background-mode light :kind 
color-scheme :family ef))
-
 ;;; ef-trio-light-theme.el ends here
diff --git a/ef-tritanopia-dark-theme.el b/ef-tritanopia-dark-theme.el
index 7115a328fd..008dd23ae7 100644
--- a/ef-tritanopia-dark-theme.el
+++ b/ef-tritanopia-dark-theme.el
@@ -40,8 +40,12 @@
   ;; Most of the colors here, like the blue and green hues, are defined
   ;; simply to preserve compatibility with the rest of the project.  We
   ;; don't actually rely on them for anything critical.
+;;;###theme-autoload
   (deftheme ef-tritanopia-dark
-    "Legible dark theme, optimized for blue-yellow color deficiency.")
+    "Legible dark theme, optimized for blue-yellow color deficiency."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-tritanopia-dark-palette
     '(
@@ -290,7 +294,4 @@ further details)."
 
   (provide-theme 'ef-tritanopia-dark))
 
-;;;###theme-autoload
-(put 'ef-tritanopia-dark 'theme-properties '(:background-mode dark :kind 
color-scheme :family ef))
-
 ;;; ef-tritanopia-dark-theme.el ends here
diff --git a/ef-tritanopia-light-theme.el b/ef-tritanopia-light-theme.el
index 5c0e19ce2b..f50ffb7042 100644
--- a/ef-tritanopia-light-theme.el
+++ b/ef-tritanopia-light-theme.el
@@ -40,8 +40,12 @@
   ;; Most of the colors here, like the blue and green hues, are defined
   ;; simply to preserve compatibility with the rest of the project.  We
   ;; don't actually rely on them for anything critical.
+;;;###theme-autoload
   (deftheme ef-tritanopia-light
-    "Legible light theme, optimized for blue-yellow color deficiency.")
+    "Legible light theme, optimized for blue-yellow color deficiency."
+    :background-mode 'light
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-tritanopia-light-palette
     '(
@@ -290,7 +294,4 @@ further details)."
 
   (provide-theme 'ef-tritanopia-light))
 
-;;;###theme-autoload
-(put 'ef-tritanopia-light 'theme-properties '(:background-mode light :kind 
color-scheme :family ef))
-
 ;;; ef-tritanopia-light-theme.el ends here
diff --git a/ef-winter-theme.el b/ef-winter-theme.el
index d0fedacadb..1ac03a7eb9 100644
--- a/ef-winter-theme.el
+++ b/ef-winter-theme.el
@@ -37,8 +37,12 @@
 (eval-and-compile
   (require 'ef-themes)
 
+;;;###theme-autoload
   (deftheme ef-winter
-    "Legible dark theme with magenta, purple, fawn, teal colors.")
+    "Legible dark theme with magenta, purple, fawn, teal colors."
+    :background-mode 'dark
+    :kind 'color-scheme
+    :family 'ef)
 
   (defconst ef-winter-palette
     '(
@@ -287,7 +291,4 @@ further details)."
 
   (provide-theme 'ef-winter))
 
-;;;###theme-autoload
-(put 'ef-winter 'theme-properties '(:background-mode dark :kind color-scheme 
:family ef))
-
 ;;; ef-winter-theme.el ends here