github/doom-modeline
1
0
Fork 0
mirror of https://github.com/correl/doom-modeline.git synced 2024-11-27 11:09:52 +00:00
Code Issues Projects Releases Packages Wiki Activity

[Feature] Support nyan cat in position segment.

Browse source
This commit is contained in:
Vincent Zhang 2019-01-04 00:21:40 +08:00
parent 804167cf5a
commit eeff72172b
2 changed files with 22 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
README.md
View file

@ -35,6 +35,7 @@ The `doom-modeline` was designed for minimalism, and offers:
- An indicator for current input method - An indicator for current input method
- An indicator for `LSP` state - An indicator for `LSP` state
- An indicator for github notifications - An indicator for github notifications
- An indicator for buffer position which is compatible with `nyan-mode`
- Truncated file name, file icon, buffer state and project name in buffer - Truncated file name, file icon, buffer state and project name in buffer
information segment, which is compatible with `projectile` and `project` information segment, which is compatible with `projectile` and `project`

36
doom-modeline.el
View file

@ -4,7 +4,7 @@
;; Author: Vincent Zhang <seagle0128@gmail.com> ;; Author: Vincent Zhang <seagle0128@gmail.com>
;; Homepage: https://github.com/seagle0128/doom-modeline ;; Homepage: https://github.com/seagle0128/doom-modeline
;; Version: 1.4.1 ;; Version: 1.4.2
;; Package-Requires: ((emacs "25.1") (all-the-icons "1.0.0") (shrink-path "0.2.0") (eldoc-eval "0.1") (dash "2.11.0")) ;; Package-Requires: ((emacs "25.1") (all-the-icons "1.0.0") (shrink-path "0.2.0") (eldoc-eval "0.1") (dash "2.11.0"))
;; Keywords: faces mode-line ;; Keywords: faces mode-line
@ -54,6 +54,7 @@
;; - An indicator for debug state ;; - An indicator for debug state
;; - An indicator for LSP state ;; - An indicator for LSP state
;; - An indicator for github notifications ;; - An indicator for github notifications
;; - An indicator for buffer position which is compatible with nyan-mode
;; - Truncated file name, file icon, buffer state and project name in buffer ;; - Truncated file name, file icon, buffer state and project name in buffer
;; information segment, which is compatible with projectile and project ;; information segment, which is compatible with projectile and project
;; ;;
@ -1711,23 +1712,28 @@ See `mode-line-percent-position'.")
(when (eq op 'set) (when (eq op 'set)
(setq doom-modeline-percent-position val))))) (setq doom-modeline-percent-position val)))))
(setq-default mode-line-position
'((line-number-mode
(column-number-mode
(doom-modeline-column-zero-based " %l:%c" " %l:%C")
" %l")
(column-number-mode (doom-modeline-column-zero-based " :%c" " :%C")))
(if doom-modeline-percent-position (" " doom-modeline-percent-position))
(:eval (when (or line-number-mode column-number-mode doom-modeline-percent-position) " "))))
(doom-modeline-def-segment buffer-position (doom-modeline-def-segment buffer-position
"The buffer position information." "The buffer position information."
`(:propertize (concat " " mode-line-position) (let ((lc '(line-number-mode
help-echo "Buffer position\n\ (column-number-mode
(doom-modeline-column-zero-based " %l:%c" " %l:%C")
" %l")
(column-number-mode (doom-modeline-column-zero-based " :%c" " :%C")))))
(if (bound-and-true-p nyan-mode)
(concat " " (nyan-create) " "
(propertize (format-mode-line lc)
'help-echo "Buffer position\n\
mouse-1: Display Line and Column Mode Menu" mouse-1: Display Line and Column Mode Menu"
mouse-face (:box 1) 'mouse-face '(:box 1)
local-map ,mode-line-column-line-number-mode-map)) 'local-map mode-line-column-line-number-mode-map))
`(:propertize (" "
(if doom-modeline-percent-position (" " doom-modeline-percent-position))
,lc
(when (or line-number-mode column-number-mode doom-modeline-percent-position) " "))
help-echo "Buffer position\n\
mouse-1: Display Line and Column Mode Menu"
mouse-face (:box 1)
local-map ,mode-line-column-line-number-mode-map))))
;; ;;
;; evil-state ;; evil-state