[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[O] [PATCH] Allow datetree to find years with trailing whitespace.
From: |
Matt Lundin |
Subject: |
[O] [PATCH] Allow datetree to find years with trailing whitespace. |
Date: |
Fri, 25 May 2012 13:16:26 -0500 |
* lisp/org-datetree.el: Fix regexp to allow datetree to find headings
with trailing whitespace. This fixes a bug in which an existing
datetree heading (e.g., "* 2012 ") would not be found by
org-datetree-find-year-create if it had trailing whitespace. This can
cause problems, for instance, if one is using column view on the date
tree, since editing subheadings with column view adds whitespace at
the end of the top heading.
---
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 192d1d6..8c04507 100644
--- a/lisp/org-datetree.el
+++ b/lisp/org-datetree.el
@@ -63,7 +63,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]\\)$")
+ (let ((re "^\\*+[ \t]+\\([12][0-9][0-9][0-9]\\)\\s-*$")
match)
(goto-char (point-min))
(while (and (setq match (re-search-forward re nil t))
--
1.7.10.2
- [O] [PATCH] Allow datetree to find years with trailing whitespace.,
Matt Lundin <=