Disable former themes only if new one loaded successfully
This commit is contained in:
parent
a0f674fc78
commit
273c1e0861
1 changed files with 4 additions and 3 deletions
|
@ -600,11 +600,12 @@ behavior). Do not set this directly, this is let-bound in `doom-init-theme-h'.")
|
||||||
doom-init-theme-p t)
|
doom-init-theme-p t)
|
||||||
(run-hooks 'doom-load-theme-hook)))
|
(run-hooks 'doom-load-theme-hook)))
|
||||||
|
|
||||||
(defadvice! doom--disable-enabled-themes-a (&rest _)
|
(defadvice! doom--disable-enabled-themes-a (theme &optional _no-confirm no-enable)
|
||||||
"Disable previously enabled themes before loading a new one.
|
"Disable previously enabled themes before loading a new one.
|
||||||
Otherwise, themes can conflict with each other."
|
Otherwise, themes can conflict with each other."
|
||||||
:before #'load-theme
|
:after-while #'load-theme
|
||||||
(mapc #'disable-theme custom-enabled-themes))
|
(unless no-enable
|
||||||
|
(mapc #'disable-theme (remq theme custom-enabled-themes))))
|
||||||
|
|
||||||
(unless EMACS27+
|
(unless EMACS27+
|
||||||
;; DEPRECATED Not needed in Emacs 27
|
;; DEPRECATED Not needed in Emacs 27
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue