From 3c89c1ee06bde6b86539f8ed1e2572973bba2b53 Mon Sep 17 00:00:00 2001 From: Case Duckworth Date: Tue, 1 Feb 2022 15:29:39 -0600 Subject: Fix spacing with +modeline-file-percentage --- lisp/+modeline.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'lisp/+modeline.el') diff --git a/lisp/+modeline.el b/lisp/+modeline.el index a813394..0cea55c 100644 --- a/lisp/+modeline.el +++ b/lisp/+modeline.el @@ -193,9 +193,9 @@ The order of elements matters: whichever one matches first is applied." (defun +modeline-file-percentage (&optional spacer) "Display the position in the current file." - `(,(or spacer +modeline-default-spacer) - (:propertize (file-percentage-mode - (" " (-3 "%p") "%%"))))) + (if file-percentage-mode + (list (or spacer +modeline-default-spacer) '(-3 "%p") "%%") + '(" "))) (define-minor-mode region-indicator-mode "Toggle the region indicator in the mode line." -- cgit 1.4.1-21-gabe81