remove duplicated defvar "creature/mode-line-region-info"

This commit is contained in:
zedhugh committed 2026-08-31 00:51:00 +08:00
1 parent 2e8ef80c3c
commit 525799407e
1 file changed
-13
-13
View File
@@ -30,19 +30,6 @@
"Length of marked string.") "Length of marked string.")
(put 'creature/mode-line-region-info 'risky-local-variable t) (put 'creature/mode-line-region-info 'risky-local-variable t)
(defvar creature/mode-line-region-info
'(:eval
(when (and (region-active-p) (eq creature/focus-window (selected-window)))
(let ((length (- (region-end) (region-beginning)))
(line (- (line-number-at-pos (region-end))
(line-number-at-pos (region-beginning))
-1)))
(propertize
(format " [%d|%d]" length line)
))))
"Length of marked string.")
(put 'creature/mode-line-region-info 'risky-local-variable t)
(defvar creature/mode-line-line-and-column (defvar creature/mode-line-line-and-column
`(line-number-mode `(line-number-mode
(column-number-mode (column-number-mode