mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-23 23:18:36 +00:00
Code Releases Activity

org-agenda: fix comment and use add-text-properties when formatting

Browse source 
* lisp/org-agenda.el (org-format-agenda-item): Fix comment and use
`add-text-properties'.

Signed-off-by: Julien Danjou <julien@danjou.info>
This commit is contained in:
Julien Danjou 2011-03-17 17:21:05 +01:00
parent 9216453a38
commit 7426874fd9
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
lisp/org-agenda.el
View file

@ -5329,9 +5329,9 @@ Any match of REMOVE-RE will be removed from TXT."
(while (string-match remove-re txt)
(setq txt (replace-match "" t t txt))))
;; Set org-heading property on `rtn' to mark the start of the
;; Set org-heading property on `txt' to mark the start of the
;; heading.
(setq txt (propertize txt 'org-heading t))
(add-text-properties 0 (1- (length txt)) '(org-heading t) txt)
;; Prepare the variables needed in the eval of the compiled format
(setq time (cond (s2 (concat