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

Fix anzu issue.

Browse source 
See https://github.com/seagle0128/doom-modeline/pull/128#issuecomment-468621209.
This commit is contained in:
Vincent Zhang 2019-03-01 18:20:25 +07:00
parent c6e95114ae
commit 07782ea9f6
1 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

9
doom-modeline-segments.el
View file

@ -43,6 +43,7 @@
(defvar anzu--current-position) (defvar anzu--current-position)
(defvar anzu--overflow-p) (defvar anzu--overflow-p)
(defvar anzu--state) (defvar anzu--state)
(defvar anzu--total-matched)
(defvar anzu-cons-mode-line-p) (defvar anzu-cons-mode-line-p)
(defvar aw-keys) (defvar aw-keys)
(defvar battery-echo-area-format) (defvar battery-echo-area-format)
@ -941,8 +942,8 @@ lines are selected, or the NxM dimensions of a block selection."
(advice-add #'evil-force-normal-state :after #'anzu--reset-status) (advice-add #'evil-force-normal-state :after #'anzu--reset-status)
;; Fix matches segment mirroring across all buffers ;; Fix matches segment mirroring across all buffers
(mapc #'make-variable-buffer-local (mapc #'make-variable-buffer-local
'(anzu--current-position '(anzu--total-matched
anzu--state anzu--cached-count anzu--current-position anzu--state anzu--cached-count
anzu--cached-positions anzu--last-command anzu--cached-positions anzu--last-command
anzu--last-isearch-string anzu--overflow-p))) anzu--last-isearch-string anzu--overflow-p)))
@ -954,9 +955,9 @@ Requires `anzu', also `evil-anzu' if using `evil-mode' for compatibility with
(not (bound-and-true-p iedit-mode))) (not (bound-and-true-p iedit-mode)))
(propertize (propertize
(let ((here anzu--current-position) (let ((here anzu--current-position)
(total anzu--cached-count)) (total anzu--total-matched))
(cond ((eq anzu--state 'replace-query) (cond ((eq anzu--state 'replace-query)
(format " %d replace " total)) (format " %d replace " anzu--cached-count))
((eq anzu--state 'replace) ((eq anzu--state 'replace)
(format " %d/%d " here total)) (format " %d/%d " here total))
(anzu--overflow-p (anzu--overflow-p