tec/org-mode
tec
/
org-mode
forked from mirrors/org-mode
1
0
Fork 0
Code Pull Requests Releases Activity

Agenda: Fix bug with column view 

Column view could fail when the agenda contains entries from the Diary
which start with a *.  This commit fixes this problems by making
`org-entry-properties' check for an org-mode buffer.
This commit is contained in:
Carsten Dominik 2009-01-06 16:31:30 +01:00
parent 3bfed1ed35
commit d31eb4cce9
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org.el
View File

@ -10291,7 +10291,9 @@ If WHICH is nil or `all', get all properties. If WHICH is
(excluded '("TODO" "TAGS" "ALLTAGS" "PRIORITY"))
beg end range props sum-props key value string clocksum)
(save-excursion
(when (condition-case nil (org-back-to-heading t) (error nil))
(when (condition-case nil
(and (org-mode-p) (org-back-to-heading t))
(error nil))
(setq beg (point))
(setq sum-props (get-text-property (point) 'org-summaries))
(setq clocksum (get-text-property (point) :org-clock-minutes))