summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorToby S. Cubitt <tsc25@cantab.net>2012-10-26 14:06:28 +0200
committerBastien Guerry <bzg@altern.org>2012-10-26 14:46:24 +0200
commit58551f1e5f3747fd82c8a061c8129476f48ad296 (patch)
treedc1d81bca2916a297357273cc14067561fbc8bed
parent73cfba486bddde8fbcaa3ff8f797c0d1d4d387e2 (diff)
downloadorg-mode-58551f1e5f3747fd82c8a061c8129476f48ad296.tar.gz
Fix bug in org-agenda-diary-sexp-prefix
* lisp/org-agenda.el (org-agenda-get-sexps): Reset `extra' to nil at beginning of re-search-forward loop, otherwise next iteration picks up `extra' value from previous entry.
-rw-r--r--lisp/org-agenda.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 510c1ec..36f3fcb 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -5454,7 +5454,8 @@ Do we have a reason to ignore this TODO entry because it has a time stamp?
tags (save-excursion (org-backward-heading-same-level 0)
(org-get-tags-at))
todo-state (org-get-todo-state)
- warntime (org-entry-get (point) "APPT_WARNTIME"))
+ warntime (org-entry-get (point) "APPT_WARNTIME")
+ extra nil)
(dolist (r (if (stringp result)
(list result)