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."
 (defun +modeline-file-percentage (&optional spacer)
  "Display the position in the current file."
-  `(,(or spacer +modeline-default-spacer)
+  (if file-percentage-mode
-    (:propertize (file-percentage-mode
+      (list (or spacer +modeline-default-spacer) '(-3 "%p") "%%")
-                  (" " (-3 "%p") "%%")))))
+    '(" ")))
 (define-minor-mode region-indicator-mode
  "Toggle the region indicator in the mode line."

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."