Ihor Radchenko <yanta...@gmail.com> writes:
> Oops. Forgot to rebase the patch to current master. The correct version
> is attached.
Thanks for the fix!
I need to make below additional change, otherwise it works perfectly. I
can't reproduce the original issue any more.
Looking at the changes, I see you changed below `concat' call to
`format'. Is this in the end some bug in the `concat' implementation?
---------------------------------8<-------------------------------------
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 299f9ccf1..36a8443c1 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -7181,7 +7181,7 @@ The optional argument TYPE tells the agenda type."
x)
(when (match-end 1)
(setq x
- (format "%s%s%s"
+ (format "%s%s%s%s"
(substring x 0 (match-end 1))
(unless (string-empty-p
org-agenda-todo-keyword-format)
(format org-agenda-todo-keyword-format
---------------------------------8<-------------------------------------
--
William
