Improve persp segment.

This commit is contained in:
Vincent Zhang 2019-03-12 23:20:52 +07:00
parent 605c5615c1
commit 72b4ea3741
2 changed files with 20 additions and 17 deletions

View file

@ -231,7 +231,7 @@ The icons may not be showed correctly in terminal and on Windows.")
(defface doom-modeline-persp-name '((t (:inherit (font-lock-comment-face italic)))) (defface doom-modeline-persp-name '((t (:inherit (font-lock-comment-face italic))))
"Face for the replace state tag in evil state indicator.") "Face for the replace state tag in evil state indicator.")
(defface doom-modeline-persp-buffer-not-in-persp '((t (:inherit (font-lock-doc-face bold)))) (defface doom-modeline-persp-buffer-not-in-persp '((t (:inherit (font-lock-doc-face bold italic))))
"Face for the replace state tag in evil state indicator.") "Face for the replace state tag in evil state indicator.")
;; ;;

View file

@ -1243,8 +1243,10 @@ Requires `eyebrowse-mode' to be enabled."
(let* ((persp (get-current-persp)) (let* ((persp (get-current-persp))
(name (safe-persp-name persp))) (name (safe-persp-name persp)))
(unless (string-equal persp-nil-name name) (unless (string-equal persp-nil-name name)
(concat
" "
(propertize (propertize
(format " #%s " name) (format "#%s" name)
'face (if (and persp 'face (if (and persp
(not (persp-contain-buffer-p (current-buffer) persp))) (not (persp-contain-buffer-p (current-buffer) persp)))
'doom-modeline-persp-buffer-not-in-persp 'doom-modeline-persp-buffer-not-in-persp
@ -1259,7 +1261,8 @@ mouse-2: Show help for minor mode"
(lambda () (lambda ()
(interactive) (interactive)
(describe-function 'persp-mode))) (describe-function 'persp-mode)))
map))))))) map))
" "))))))
(add-hook 'find-file-hook #'doom-modeline-update-persp-name) (add-hook 'find-file-hook #'doom-modeline-update-persp-name)
(add-hook 'persp-activated-functions #'doom-modeline-update-persp-name) (add-hook 'persp-activated-functions #'doom-modeline-update-persp-name)