diff options
author | Case Duckworth | 2022-02-01 15:29:39 -0600 |
---|---|---|
committer | Case Duckworth | 2022-02-01 15:29:39 -0600 |
commit | 3c89c1ee06bde6b86539f8ed1e2572973bba2b53 (patch) | |
tree | ee7997bbf41a8fcf09404f117a42d10b339a3974 | |
parent | Change default fonts on bob (diff) | |
download | emacs-3c89c1ee06bde6b86539f8ed1e2572973bba2b53.tar.gz emacs-3c89c1ee06bde6b86539f8ed1e2572973bba2b53.zip |
Fix spacing with +modeline-file-percentage
-rw-r--r-- | lisp/+modeline.el | 6 |
1 files changed, 3 insertions, 3 deletions
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." | |||
193 | 193 | ||
194 | (defun +modeline-file-percentage (&optional spacer) | 194 | (defun +modeline-file-percentage (&optional spacer) |
195 | "Display the position in the current file." | 195 | "Display the position in the current file." |
196 | `(,(or spacer +modeline-default-spacer) | 196 | (if file-percentage-mode |
197 | (:propertize (file-percentage-mode | 197 | (list (or spacer +modeline-default-spacer) '(-3 "%p") "%%") |
198 | (" " (-3 "%p") "%%"))))) | 198 | '(" "))) |
199 | 199 | ||
200 | (define-minor-mode region-indicator-mode | 200 | (define-minor-mode region-indicator-mode |
201 | "Toggle the region indicator in the mode line." | 201 | "Toggle the region indicator in the mode line." |