More descriptive selection info in mode-line
This commit is contained in:
parent
2c0ed67a51
commit
9973305e0e
1 changed files with 7 additions and 4 deletions
|
@ -416,10 +416,13 @@ Supports both Emacs and Evil cursor conventions."
|
||||||
(and evil (eq 'block evil-visual-selection))))
|
(and evil (eq 'block evil-visual-selection))))
|
||||||
(multi-line (or (> lines 1) (eq 'line evil-visual-selection))))
|
(multi-line (or (> lines 1) (eq 'line evil-visual-selection))))
|
||||||
(cond
|
(cond
|
||||||
(rect (format "%dx%d block" lines (if evil cols (1- cols))))
|
(rect (format "%dx%dB" lines (if evil cols (1- cols))))
|
||||||
(multi-line (format "%d lines" lines))
|
(multi-line
|
||||||
(t (format "%d chars" (if evil chars (1- chars)))))))
|
(if (and (eq evil-state 'visual) (eq evil-this-type 'line))
|
||||||
:when (or mark-active (eq 'visual evil-state))
|
(format "%dL" lines)
|
||||||
|
(format "%dC %dL" chars lines)))
|
||||||
|
(t (format "%dC" (if evil chars (1- chars)))))))
|
||||||
|
:when (eq 'visual evil-state)
|
||||||
:face highlight-face
|
:face highlight-face
|
||||||
:skip-alternate t)
|
:skip-alternate t)
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue