diff options
| author | Carsten Dominik <carsten.dominik@gmail.com> | 2011-12-31 09:05:11 +0100 |
|---|---|---|
| committer | Bastien Guerry <bzg@altern.org> | 2012-01-03 09:17:36 +0100 |
| commit | 73b1fdb96522d86e8f78d450a20ce2138c9dcf31 (patch) | |
| tree | fed9c373b17cfe36db13248bbbe804d61e350e20 | |
| parent | b3a18bdea4d585e370277df6836fd1adbca51246 (diff) | |
| download | org-mode-73b1fdb96522d86e8f78d450a20ce2138c9dcf31.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)) |