diff options
author | Carsten Dominik <carsten.dominik@gmail.com> | 2011-12-31 09:05:11 +0100 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2011-12-31 09:05:11 +0100 |
commit | 746bd50327b746dfa3f35b126bc383c6c6a3db01 (patch) | |
tree | 6f1d7852f18d445ee843003f55c485475cef3a86 | |
parent | c434f7171e10317a77d33c1c159c932e43296730 (diff) | |
download | org-mode-746bd50327b746dfa3f35b126bc383c6c6a3db01.tar.gz |
Fix clock regexps
* lisp/org-clock.el (org-clock-in):
(org-clock-find-position): Remove erraneous space in regexp
Patch by Joe Vornehm Jr.
TINYCHANGE
-rw-r--r-- | lisp/org-clock.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/org-clock.el b/lisp/org-clock.el index b29f47b..3a0951e 100644 --- a/lisp/org-clock.el +++ b/lisp/org-clock.el @@ -1115,7 +1115,7 @@ the clocking selection, associated with the letter `d'." (cond ((and org-clock-in-resume (looking-at - (concat "^[ \t]* " org-clock-string + (concat "^[ \t]*" org-clock-string " \\[\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}" " *\\sw+\.? +[012][0-9]:[0-5][0-9]\\)\\][ \t]*$"))) (message "Matched %s" (match-string 1)) @@ -1247,7 +1247,7 @@ line and position cursor in that line." (goto-char beg) (when (and find-unclosed (re-search-forward - (concat "^[ \t]* " org-clock-string + (concat "^[ \t]*" org-clock-string " \\[\\([0-9]\\{4\\}-[0-9]\\{2\\}-[0-9]\\{2\\}" " *\\sw+ +[012][0-9]:[0-5][0-9]\\)\\][ \t]*$") end t)) |