Rodrigo Morales <rodrigo.mora...@utec.edu.pe> writes: >> For this reason, I am wondering whether there is a way to make >> =org-agenda-entry-text-mode= to show the drawers without much >> tinkering. >> > > After inspecting the source code of Org Mode, I managed to do what I was > searching by deleting the relevant part of the function > =org-agenda-get-some-entry-text=. This function unconditionally removes > drawers from subtrees in order for the remaining content be shown in > text entries. > > I've created the following patch which adds a defcustom that would allow > the user to decide whether drawers must be hidden or shown in text > entries. Hope this helps.
Thanks! The patch looks useful. > +(defcustom org-agenda-entry-text-hide-drawers t > + "Non-nil means hide drawers in entry text in agenda buffers." > + :group 'org-agenda > + :type 'boolean) > + (when org-agenda-entry-text-hide-drawers > + (while (re-search-forward drawer-re nil t) > + (delete-region > + (match-beginning 0) > + (progn (re-search-forward > + "^[ \t]*:END:.*\n?" nil 'move) > + (point))))) > (unless (member 'planning keep) I'd prefer if you reuse the KEEP argument to org-agenda-get-some-entry-text. It is already designed for such things. Best, Ihor
