File tree Expand file tree Collapse file tree 3 files changed +15
-0
lines changed
Expand file tree Collapse file tree 3 files changed +15
-0
lines changed Original file line number Diff line number Diff line change 135135 " When theme is changed, update `cider-docview-code-background-color' ."
136136 (setq cider-docview-code-background-color (cider-scale-background-color)))
137137
138+
139+ (defadvice disable-theme (after cider-docview-adapt-to-theme activate)
140+ " When theme is disabled, update `cider-docview-code-background-color' ."
141+ (setq cider-docview-code-background-color (cider-scale-background-color)))
142+
138143
139144; ; Mode & key bindings
140145
Original file line number Diff line number Diff line change @@ -175,6 +175,11 @@ The error types are represented as strings."
175175 (setq cider-stacktrace-frames-background-color (cider-scale-background-color)))
176176
177177
178+ (defadvice disable-theme (after cider-stacktrace-adapt-to-theme activate)
179+ " When theme is disabled, update `cider-stacktrace-frames-background-color' ."
180+ (setq cider-stacktrace-frames-background-color (cider-scale-background-color)))
181+
182+
178183; ; Mode & key bindings
179184
180185(defvar cider-stacktrace-mode-map
Original file line number Diff line number Diff line change @@ -122,6 +122,11 @@ Add to this list to have CIDER recognize additional test defining macros."
122122 (setq cider-test-items-background-color (cider-scale-background-color)))
123123
124124
125+ (defadvice disable-theme (after cider-test-adapt-to-theme activate)
126+ " When theme is disabled, update `cider-test-items-background-color' ."
127+ (setq cider-test-items-background-color (cider-scale-background-color)))
128+
129+
125130; ;; Report mode & key bindings
126131; ; The primary mode of interacting with test results is the report buffer, which
127132; ; allows navigation among tests, jumping to test definitions, expected/actual
You can’t perform that action at this time.
0 commit comments