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
This commit is contained in:
Tom Hinton 2015-08-12 12:46:47 +01:00 committed by Nicolas Goaziou
parent db314d8ad0
commit 0500bd09e2

View file

@ -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)