+(defun my-is-special-buffer ()
+ ;; suppose all buffer name started with a star is a special buffer.
+ (string-match "\*" (buffer-name)))
+
+(defun my-get-buffer-name-face (orignal-face)
+ (cond
+ ((not (powerline-selected-window-active)) orignal-face)
+ (buffer-read-only
+ 'sd/buffer-view-active1)
+ ((and (buffer-modified-p) (not (my-is-special-buffer)))
+ 'sd/buffer-modified-active1)
+ (t orignal-face)))
+
+(defun get-active-window-evil-tag ()
+ (dolist (i (window-list) ret)
+ (with-selected-window i
+ (when (powerline-selected-window-active)
+ (setq ret (with-current-buffer (window-buffer)
+ evil-mode-line-tag))))))
+