From: Peng Li Date: Fri, 8 Sep 2017 21:51:44 +0000 (+0800) Subject: improve function X-Git-Url: http://47.100.26.94:8080/?a=commitdiff_plain;h=3a8f67785170e923fb91cd603cd8ba6ae8db9943;hp=7e180033eb67dada5b972bbb2d1fa37bbf61afef;p=dotfiles.git improve function --- diff --git a/emacs.d/my-mode-line.el b/emacs.d/my-mode-line.el index e13ad33..095b415 100644 --- a/emacs.d/my-mode-line.el +++ b/emacs.d/my-mode-line.el @@ -28,38 +28,28 @@ "According to the window layout, separate the windows as six types. Each type will have different mode line. This function return the defined window type." - (if - (and - (not (window-in-direction 'right nil t -1)) - (not (window-in-direction 'left nil t -1)) - (not (window-in-direction 'below nil t 1))) - 1 - (if - (and - (window-in-direction 'right nil t -1) - (not (window-in-direction 'left nil t -1)) - (not (window-in-direction 'below nil t 1))) - 2 - (if - (and - (not (window-in-direction 'right nil t -1)) - (window-in-direction 'left nil t -1) - (not (window-in-direction 'below nil t 1))) - 3 - (if - (and - (window-in-direction 'right nil t -1) - (not (window-in-direction 'left nil t -1)) - (window-in-direction 'below nil t 1)) - 5 - (if - (and - (not (window-in-direction 'right nil t -1)) - (window-in-direction 'left nil t -1) - (window-in-direction 'below nil t 1)) - 6 - 4)))))) - + (cond ((and (not (window-in-direction 'right nil t -1)) + (not (window-in-direction 'left nil t -1)) + (not (window-in-direction 'below nil t 1))) + 1) + ((and (window-in-direction 'right nil t -1) + (not (window-in-direction 'left nil t -1)) + (not (window-in-direction 'below nil t 1))) + 2) + ((and (not (window-in-direction 'right nil t -1)) + (window-in-direction 'left nil t -1) + (not (window-in-direction 'below nil t 1))) + 3) + ((and (window-in-direction 'right nil t -1) + (not (window-in-direction 'left nil t -1)) + (window-in-direction 'below nil t 1)) + 5) + ((and (not (window-in-direction 'right nil t -1)) + (window-in-direction 'left nil t -1) + (window-in-direction 'below nil t 1)) + 6) + (t + 4))) (defun sd/powerline-center-theme_revised-2 ()