diff options
author | Tom Hinton <tom.hinton@cse.org.uk> | 2015-08-12 12:46:47 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-08-13 22:51:09 +0200 |
commit | 0500bd09e242d3580b04dd755608f706cc6eafd9 (patch) | |
tree | 79e59a68b13d53eae9e92247bd554835e5a906b6 | |
parent | db314d8ad0dc9282653b630da3857327701fa625 (diff) | |
download | org-mode-0500bd09e242d3580b04dd755608f706cc6eafd9.tar.gz |
Fix clock in when org-clock-into-drawer is integer
* org-clock.el (org-clock-jump-to-current-clock): Fixed a bug wherein
`org-clock-jump-to-current-clock' did not work if
`org-clock-into-drawer' was not either a string or nil.
TINYCHANGE
-rw-r--r-- | lisp/org-clock.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-clock.el b/lisp/org-clock.el index e44da73..6de093f 100644 --- a/lisp/org-clock.el +++ b/lisp/org-clock.el @@ -950,7 +950,7 @@ If necessary, clock-out of the currently active clock." (when drawer (org-with-wide-buffer (let ((drawer-re (format "^[ \t]*:%s:[ \t]*$" - (regexp-quote (or drawer "LOGBOOK")))) + (regexp-quote (if (stringp drawer) drawer "LOGBOOK")))) (beg (save-excursion (outline-back-to-heading t) (point)))) (catch 'exit (while (re-search-backward drawer-re beg t) |