branch: elpa/moe-theme
commit 5dc49ae5a7aeab55439628f5d7b3c5d4e9d5f6db
Author: kuanyui <[email protected]>
Commit: kuanyui <[email protected]>
Fix a problem encountered in latest development version Emacs.
[info] In Emacs 24.3.50.1 , background-color may cannot be changed under
GUI Emacs.
---
moe-theme.el | 14 ++++++++++++++
1 file changed, 14 insertions(+)
diff --git a/moe-theme.el b/moe-theme.el
index 29d16a2d6c..a2dda55b12 100644
--- a/moe-theme.el
+++ b/moe-theme.el
@@ -269,6 +269,12 @@ Don't setq this manually.")
(if (and (not (null moe-light-pure-white-background-in-terminal))
(null (window-system)))
(set-face-attribute 'default nil :background "#ffffff"
:foreground "#5f5f5f"))))
+ ;; In Emacs 24.3.50.1 , background-color may cannot be changed under GUI
Emacs.
+ ;; So do this again.
+ (if window-system
+ (progn
+ (set-background-color "#fdfde7")
+ (set-foreground-color "#5f5f5f")))
(cond ((eq moe-theme-mode-line-color 'blue)
(set-face-attribute 'mode-line nil :background "#5fafd7" :foreground
"#ffffff")
@@ -318,6 +324,14 @@ Don't setq this manually.")
(interactive)
(if (not (null moe-theme-revert-theme))
(load-theme 'moe-dark t))
+
+ ;; In Emacs 24.3.50.1 , background-color may cannot be changed under GUI
Emacs.
+ ;; So do this again.
+ (if window-system
+ (progn
+ (set-background-color "#303030")
+ (set-foreground-color "#c6c6c6")))
+
(moe-theme-resize-font-size)
(cond ((eq moe-theme-mode-line-color 'blue)
(set-face-attribute 'mode-line nil :background "#5fafd7" :foreground
"#ffffff")
