diff options
Diffstat (limited to 'lisp/custom.el')
| -rw-r--r-- | lisp/custom.el | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/lisp/custom.el b/lisp/custom.el index d8baf21d960..b4d1ba7317f 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)) |