Function: theme-list-variants

theme-list-variants is a byte-compiled function defined in custom.el.gz.

Signature

(theme-list-variants THEME &rest LIST)

Documentation

Return a list of theme variants for THEME.

By default this will use all known custom themes (see custom-available-themes) to check for variants. This can be restricted if the optional argument LIST containing a list of theme symbols to consider.

Source Code

;; Defined in /usr/src/emacs/lisp/custom.el.gz
(defun theme-list-variants (theme &rest list)
  "Return a list of theme variants for THEME.
By default this will use all known custom themes (see
`custom-available-themes') to check for variants.  This can be
restricted if the optional argument LIST containing a list of
theme symbols to consider."
  (let* ((properties (get theme 'theme-properties))
         (family (plist-get properties :family)))
    (seq-filter
     (lambda (variant)
       (and (eq (plist-get (get variant 'theme-properties) :family)
                family)
            (not (eq variant theme))))
     (or list (custom-available-themes)))))