emacs-diffs
[Top][All Lists]
Advanced

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

master 3f0944c51f 1/2: Revert "Add new user option 'custom-ensure-single


From: Philip Kaludercic
Subject: master 3f0944c51f 1/2: Revert "Add new user option 'custom-ensure-single-theme'"
Date: Sun, 11 Sep 2022 07:28:57 -0400 (EDT)

branch: master
commit 3f0944c51f1657b8fea9600d554890c68fa2dabe
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    Revert "Add new user option 'custom-ensure-single-theme'"
    
    This reverts commit b4dbf7184cd68ecd8d1a27fbc1407be0eae7e64c.
---
 etc/NEWS       | 11 -----------
 lisp/custom.el | 12 ------------
 2 files changed, 23 deletions(-)

diff --git a/etc/NEWS b/etc/NEWS
index 2d2bd789fb..2f52e9bc37 100644
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -2932,17 +2932,6 @@ These are run after enabling and disabling a theme, 
respectively.
 Using 'make-obsolete' on a theme is now supported.  This will make
 'load-theme' issue a warning when loading the theme.
 
-+++
-*** New command 'toggle-theme'
-If a theme defines a dual pair (e.g. a light or dark variant) this
-command can be used disable the current one and enable the other.
-
----
-*** New user option 'custom-ensure-single-active-theme'
-If non-nil, all themes will be disabled before a new theme is enabled,
-so that there is always at most one active theme at any time.
-
-
 +++
 ** New hook 'display-monitors-changed-functions'.
 It is called whenever the configuration of different monitors on a
diff --git a/lisp/custom.el b/lisp/custom.el
index d8baf21d96..b4d1ba7317 100644
--- a/lisp/custom.el
+++ b/lisp/custom.el
@@ -1280,12 +1280,6 @@ This variable cannot be set in a Custom theme."
   :risky t
   :version "24.1")
 
-(defcustom custom-ensure-single-active-theme nil
-  "Non-nil means that `load-theme' should ensure only one theme is active."
-  :type 'boolean
-  :group 'customize
-  :version "29.1")
-
 (defun load-theme (theme &optional no-confirm no-enable)
   "Load Custom theme named THEME from its file and possibly enable it.
 The theme file is named THEME-theme.el, in one of the directories
@@ -1310,9 +1304,6 @@ This function is normally called through Customize when 
setting
 should be called with a non-nil NO-CONFIRM argument, or after
 `custom-safe-themes' has been loaded.
 
-If `custom-ensure-single-active-theme' is non-nil, all other active
-themes will be disabled before THEME is enabled.
-
 Return t if THEME was successfully loaded, nil otherwise."
   (interactive
    (list
@@ -1376,9 +1367,6 @@ Return t if THEME was successfully loaded, nil otherwise."
       (setq tail (cdr tail)))
     (when found
       (put theme 'theme-settings (cons found (delq found settings)))))
-  ;; Check if the user only wants one theme to be active
-  (when custom-ensure-single-active-theme
-    (mapc #'disable-theme custom-enabled-themes))
   ;; Finally, enable the theme.
   (unless no-enable
     (enable-theme theme))



reply via email to

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