summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorStefan Kangas <stefan@marxist.se>2021-09-29 06:54:52 +0200
committerStefan Kangas <stefan@marxist.se>2021-09-29 06:57:28 +0200
commitfcfcb35791495ea842d30efc3d87a088ecd57977 (patch)
tree8efe27ccd118131d72ef1e26f208cdb84ecea429
parentcbb0b5d8d5c823357951689ea4f14994e0399992 (diff)
downloademacs-fcfcb35791495ea842d30efc3d87a088ecd57977.tar.gz
* lisp/mpc.el (mpc-format): Fix printing after last format spec.
-rw-r--r--lisp/mpc.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/mpc.el b/lisp/mpc.el
index 1f4cb4fe9cd..494a4b9d888 100644
--- a/lisp/mpc.el
+++ b/lisp/mpc.el
@@ -1111,6 +1111,9 @@ If PLAYLIST is t or nil or missing, use the main playlist."
(if (null size) (setq col (+ col textwidth postwidth))
(insert space)
(setq col (+ col size))))))
+ ;; Print the rest of format-spec, in case there is text after the
+ ;; last actual format specifier.
+ (insert (substring format-spec pos))
(put-text-property start (point) 'mpc--uptodate-p pred)))
;;; The actual UI code ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;