bug#62847: 29.0.90; Propertized space in Org Agenda's mode-name

[Ihor Radchenko]

Gustavo Barros <gusbrs.2016@gmail.com> writes:

> Call `M-x org-agenda RET a'.  Now examine `mode-name' with `M-:
> mode-name RET' to get:
>
> #+begin_src emacs-lisp
> ("Org-Agenda" "" #(" " 0 1 (org-category "agenda" tags nil...

I suspect that it is Emacs-related because I see nothing wrong done on
Org side.

The code setting `mode-name' is

(defun org-agenda-set-mode-name ()
  "Set the mode name to indicate all the small mode settings."
  (setq mode-name
        (list "Org-Agenda"
              (if (get 'org-agenda-files 'org-restrict) " []" "")
              " "
              '(:eval (org-agenda-span-name org-agenda-current-span))
              ...)))

Note the third " " in `mode-name' list.
Org does not modify the mode-name by side effect.

This bug is only reproducible when using built-in Org. When I tried to
reproduce with Git version of Org (the same release tag), no extra
properties are present in `mode-name'.

-- 
Ihor Radchenko // yantar92,
Org mode contributor,
Learn more about Org mode at <https://orgmode.org/>.
Support Org development at <https://liberapay.com/org-mode>,
or support my work at <https://liberapay.com/yantar92>