summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2013-02-06 17:18:03 +0100
committerBastien Guerry <bzg@altern.org>2013-02-06 17:18:03 +0100
commitb07a9bb29ab22c108d05528b957674d2de3463e3 (patch)
treedcc296a50984d94bcbdf66ab4cfa2de0bf913620
parentf27e1e8e4d6ffd3f92287a4a9122e752238c1bb3 (diff)
downloadorg-mode-b07a9bb29ab22c108d05528b957674d2de3463e3.tar.gz
org-agenda.el: Bugfix.
* org-agenda.el (org-agenda-get-deadlines) (org-agenda-get-scheduled): Fix bug: use text properties for the headline text since we rely on properties to get e.g. the effort.
-rw-r--r--lisp/org-agenda.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 6309771..9b6dcae 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -5949,7 +5949,7 @@ See also the user option `org-agenda-clock-consistency-checks'."
(or (eq org-agenda-use-tag-inheritance t)
(memq 'agenda org-agenda-use-tag-inheritance))))
tags (org-get-tags-at pos1 (not inherited-tags)))
- (setq head (buffer-substring-no-properties
+ (setq head (buffer-substring
(point)
(progn (skip-chars-forward "^\r\n")
(point))))
@@ -6086,7 +6086,7 @@ FRACTION is what fraction of the head-warning time has passed."
(or (eq org-agenda-use-tag-inheritance t)
(memq 'agenda org-agenda-use-tag-inheritance))))
tags (org-get-tags-at nil (not inherited-tags)))
- (setq head (buffer-substring-no-properties
+ (setq head (buffer-substring
(point)
(progn (skip-chars-forward "^\r\n") (point))))
(if (string-match " \\([012]?[0-9]:[0-9][0-9]\\)" s)