org-agenda-todo-keyword-format issues with org-modern

[amenity-green-broker]

Hello,

I am using org-modern, and I am having a strange issue when using it together with org-agenda-todo-keyword-format.

I currently have the configuration: (setq org-agenda-todo-keyword-format "%-8s")

With a restarted emacs, the settings work normally, and I have the following view in day agenda:

After I visit the file where the headings are, I get these letters after the todo keywords:

It happens for all keywords after they have been seen in another file.

My relevant org-modern and agenda configuration are:

(setq org-todo-keywords
      '((sequence "INBOX(i)" "BACKLOG(b!)" "TODO(t)" "IN-PROGRESS(p)" "WAITING(w@)" "|" "DONE(d!)" "CANCELED(c!)")
	(sequence "META(m)" "DONE(d)")))


;; org-agenda
(global-set-key (kbd "C-c a") #'org-agenda)
(global-set-key (kbd "C-c c") #'org-capture)
(setq org-agenda-span 'day)
(setq org-agenda-prefix-format '((agenda . "%(my/format-org-categories) %-6e% s")
                                (todo . "%(my/format-org-categories)  %-6e %s")
                                (tags . "%(my/format-org-categories)")
                                (search ."%-12:c")))
;; my/format-org-categories limits length of category string

(setq org-agenda-todo-keyword-format "%-8s")

(use-package org-modern
  :ensure t
  :init
  (add-hook 'org-mode-hook #'org-modern-mode)
  (add-hook 'org-agenda-finalize-hook #'org-modern-agenda)
  :config
  (set-face-attribute 'org-modern-symbol nil :family "Iosevka")
  (setq org-modern-todo-faces '(("INBOX" :background "snow" :foreground "black")
				("BACKLOG" :background "peach puff" :foreground "black")
				("TODO" :background "dark salmon" :foreground "black")
				("IN-PROGRESS" :background  "salmon" :foreground "black")
				("WAITING" :background "rosy brown" :foreground "black")
				("DONE" :background "dark green" :foreground "white")
				("CANCELED" :background "dark khaki" :foreground "black")
				("META" :background "thistle" :foreground "black")))
  (setq org-modern-priority-faces '((?A :background "IndianRed1" :foreground "white")
				    (?B :background "IndianRed3" :foreground "white")
				    (?C :background "IndianRed4" :foreground "white"))))				      

I also use org-super-agenda, but I am not sure that is relevant here.
If you need further information, let me know.
Thank you

[minad]

Hi! I am happy to consider patches which improve support for org-agenda-todo-keyword-format. org-modern works well without changes to this setting so this is a low priority issue.