From 03b0a834ddcbdd6fb9073f4c3e160d56211a6096 Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Wed, 4 Nov 2020 19:49:35 -0500 Subject: [PATCH] Fix #4214: support setting doom-theme to 'default People who like the default theme actually exist. --- core/core-ui.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/core/core-ui.el b/core/core-ui.el index 2d920bc3d..e17892265 100644 --- a/core/core-ui.el +++ b/core/core-ui.el @@ -9,7 +9,7 @@ (defvar doom-theme nil "A symbol representing the Emacs theme to load at startup. -This is changed by `load-theme'.") +Set to `default' to load no theme at all. This is changed by `load-theme'.") (defvar doom-font nil "The default font to use. @@ -581,7 +581,9 @@ behavior). Do not set this directly, this is let-bound in `doom-init-theme-h'.") (defun doom-init-theme-h (&optional frame) "Load the theme specified by `doom-theme' in FRAME." - (when (and doom-theme (not (memq doom-theme custom-enabled-themes))) + (when (and doom-theme + (not (eq doom-theme 'default)) + (not (memq doom-theme custom-enabled-themes))) (with-selected-frame (or frame (selected-frame)) (let ((doom--prefer-theme-elc t)) ; DEPRECATED in Emacs 27 (load-theme doom-theme t)))))