[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] datetree: Recognize year headline with tags as a match
From: |
Tim Burt |
Subject: |
[O] [PATCH] datetree: Recognize year headline with tags as a match |
Date: |
Sun, 24 Feb 2013 16:03:22 -0500 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.1 (gnu/linux) |
* lisp/org-datetree.el (org-datetree-find-year-create):
Include regexp for tags. Syntax was taken directly
from org-todo-line-tags-regexp in org.el.
Change made to fix the problem where a year headline of a
datetree was not matched if it had a tag. The :NOEXPORT: tag
is one useful case that should be matched.
Initial problem observation reported by Jeffrey McBeth on the
org-mode mailing list.
TINYCHANGE
---
lisp/org-datetree.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lisp/org-datetree.el b/lisp/org-datetree.el
index f2e35fa..0102393 100644
--- a/lisp/org-datetree.el
+++ b/lisp/org-datetree.el
@@ -72,7 +72,7 @@ tree can be found."
(goto-char (prog1 (point) (widen))))))
(defun org-datetree-find-year-create (year)
- (let ((re "^\\*+[ \t]+\\([12][0-9][0-9][0-9]\\)\\s-*$")
+ (let ((re "^\\*+[ \t]+\\([12][0-9][0-9][0-9]\\)\\(.*?\\([
\t]:[[:alnum:]:address@hidden:\\)?\\s-*$\\)")
match)
(goto-char (point-min))
(while (and (setq match (re-search-forward re nil t))
--
1.7.11.7
- [O] [PATCH] datetree: Recognize year headline with tags as a match,
Tim Burt <=