projects
/
dotfiles.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
9683cc3
)
emacs - change color in mode-line yellow for
author
Peng Li
<seudut@gmail.com>
Mon, 18 Jul 2016 09:43:55 +0000
(17:43 +0800)
committer
Peng Li
<seudut@gmail.com>
Mon, 18 Jul 2016 09:43:55 +0000
(17:43 +0800)
emacs.d/config.org
patch
|
blob
|
history
diff --git
a/emacs.d/config.org
b/emacs.d/config.org
index
4fff7f3
..
e3b3304
100644
(file)
--- a/
emacs.d/config.org
+++ b/
emacs.d/config.org
@@
-413,6
+413,15
@@
Revised powerline-center-theme
(replace-regexp-in-string "Git[:-]" "" s)
s))
(replace-regexp-in-string "Git[:-]" "" s)
s))
+ (defface sd/powerline-active1 '((t (:background "yellow" :foreground "red" :inherit mode-line)))
+ "My Powerline face 1 based on powerline-active1."
+ :group 'powerline)
+
+ (defface sd/mode-line-buffer-id
+ '((t (:background "yellow" :foreground "black" :inherit mode-line-buffer-id)))
+ "Powerline mode-line face"
+ :group 'powerline)
+
(defun sd/powerline-center-theme_revised ()
"Setup a mode-line with major and minor modes centered."
(interactive)
(defun sd/powerline-center-theme_revised ()
"Setup a mode-line with major and minor modes centered."
(interactive)
@@
-420,8
+429,9
@@
Revised powerline-center-theme
'("%e"
(:eval
(let* ((active (powerline-selected-window-active))
'("%e"
(:eval
(let* ((active (powerline-selected-window-active))
- (mode-line-buffer-id (if active 'mode-line-buffer-id 'mode-line-buffer-id-inactive))
+ (mode-line-buffer-id (if active '
sd/
mode-line-buffer-id 'mode-line-buffer-id-inactive))
(mode-line (if active 'mode-line 'mode-line-inactive))
(mode-line (if active 'mode-line 'mode-line-inactive))
+ (my-face1 (if active 'sd/powerline-active1 'powerline-inactive1))
(face1 (if active 'powerline-active1 'powerline-inactive1))
(face2 (if active 'powerline-active2 'powerline-inactive2))
(separator-left (intern (format "powerline-%s-%s"
(face1 (if active 'powerline-active1 'powerline-inactive1))
(face2 (if active 'powerline-active2 'powerline-inactive2))
(separator-left (intern (format "powerline-%s-%s"
@@
-430,23
+440,22
@@
Revised powerline-center-theme
(separator-right (intern (format "powerline-%s-%s"
(powerline-current-separator)
(cdr powerline-default-separator-dir))))
(separator-right (intern (format "powerline-%s-%s"
(powerline-current-separator)
(cdr powerline-default-separator-dir))))
- (lhs (list (powerline-raw "%*" m
ode-line
'l)
+ (lhs (list (powerline-raw "%*" m
y-face1
'l)
;; (powerline-buffer-size mode-line 'l)
(powerline-buffer-id mode-line-buffer-id 'l)
;; (powerline-buffer-size mode-line 'l)
(powerline-buffer-id mode-line-buffer-id 'l)
- (powerline-raw " ")
- (funcall separator-left m
ode-line
face1)
+ (powerline-raw " "
my-face1
)
+ (funcall separator-left m
y-face1
face1)
(powerline-narrow face1 'l)
;; (powerline-vc face1)
(powerline-narrow face1 'l)
;; (powerline-vc face1)
- (sd/powerline-simpler-vc (powerline-vc face1))
- ))
+ (sd/powerline-simpler-vc (powerline-vc face1))))
(rhs (list (powerline-raw global-mode-string face1 'r)
(powerline-raw "%4l" face1 'r)
(rhs (list (powerline-raw global-mode-string face1 'r)
(powerline-raw "%4l" face1 'r)
- (powerline-raw ":" face1)
+ (powerline-raw ":" face1)
(powerline-raw "%3c" face1 'r)
(powerline-raw "%3c" face1 'r)
- (funcall separator-right face1 m
ode-line
)
- (powerline-raw " "
)
- (powerline-raw "%6p" m
ode-line
'r)
- (powerline-hud
face2 face1
)))
+ (funcall separator-right face1 m
y-face1
)
+ (powerline-raw " "
my-face1)
+ (powerline-raw "%6p" m
y-face1
'r)
+ (powerline-hud
my-face1 face1
)))
(center (list (powerline-raw " " face1)
(funcall separator-left face1 face2)
(when (and (boundp 'erc-track-minor-mode) erc-track-minor-mode)
(center (list (powerline-raw " " face1)
(funcall separator-left face1 face2)
(when (and (boundp 'erc-track-minor-mode) erc-track-minor-mode)