From 498b0ae295453e1ce5ef42d54cb8dfb9f930809e Mon Sep 17 00:00:00 2001 From: Tom Hinton Date: Wed, 12 Aug 2015 12:46:47 +0100 Subject: [PATCH] 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. This is a TINYCHANGE, although I am happy to assign copyright to the FSF. --- lisp/org-clock.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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) -- 2.1.4