From 7e180033eb67dada5b972bbb2d1fa37bbf61afef Mon Sep 17 00:00:00 2001 From: Peng Li Date: Sat, 9 Sep 2017 05:36:57 +0800 Subject: [PATCH] my modle line theme --- emacs.d/my-mode-line.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/emacs.d/my-mode-line.el b/emacs.d/my-mode-line.el index 4c2e5c0..e13ad33 100644 --- a/emacs.d/my-mode-line.el +++ b/emacs.d/my-mode-line.el @@ -56,11 +56,10 @@ window type." (and (not (window-in-direction 'right nil t -1)) (window-in-direction 'left nil t -1) - (window-in-direction 'below ni t 1)) + (window-in-direction 'below nil t 1)) 6 4)))))) -;(my-get-window-type) (defun sd/powerline-center-theme_revised-2 () @@ -88,7 +87,7 @@ window type." (separator-right (intern (format "powerline-%s-%s" (powerline-current-separator) (cdr powerline-default-separator-dir)))) - (lhs (if (or (= window-type 1) (= window-type 2) (= window-type 3) (= window-type 5)) + (lhs (if (or (= window-type 1) (= window-type 2) (= window-type 3) (= window-type 6)) (list (powerline-raw "%* " my-face-buffer-modified 'l) (powerline-raw " " my-face1) (funcall separator-left my-face1 face1) @@ -101,8 +100,9 @@ window type." (powerline-raw (concat " ==" (number-to-string (my-get-window-type)) "== ") face2) (funcall separator-left face2 face1)) nil)) - (rhs (if (or (= window-type 1) (= window-type 3) (= window-type 2) (= window-type 6)) - (list (powerline-raw (format-time-string " %I:%M %p ") my-face1 'r)) + (rhs (if (or (= window-type 1) (= window-type 3) (= window-type 2) (= window-type 5)) + (list (funcall separator-right face1 my-face1) + (powerline-raw (format-time-string " %I:%M %p ") my-face1 'r)) nil))) (concat (powerline-render lhs) (powerline-fill-center face1 (/ (powerline-width center) 2.0)) -- 2.11.0