summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2014-12-03 15:24:40 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2014-12-03 15:24:40 +0100
commit83249b668e4d2ef73d7591972c762b2fa1ed7ef4 (patch)
tree7ef4d50b8fc4f1d6ed25e974eb10682abd0357e2
parentdcf64c7ee338d4e50a95427848bc8650184cd9de (diff)
downloadorg-mode-83249b668e4d2ef73d7591972c762b2fa1ed7ef4.tar.gz
org-clock: Fix clocking when `org-clock-into-drawer' is a number
* lisp/org-clock.el (org-clock-find-position): Check if `org-clock-into-drawer' is a number when inserting the first clock. Reported-by: Rainer Stengele <rainer.stengele@online.de> <http://permalink.gmane.org/gmane.emacs.orgmode/93128>
-rw-r--r--lisp/org-clock.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index 46540d2..a395813 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -1473,7 +1473,9 @@ line and position cursor in that line."
(forward-line))
(unless (bolp) (insert "\n"))
;; Create a new drawer if necessary.
- (when org-clock-into-drawer
+ (when (and org-clock-into-drawer
+ (or (not (wholenump org-clock-into-drawer))
+ (< org-clock-into-drawer 2)))
(let ((beg (point)))
(insert ":" drawer ":\n:END:\n")
(org-indent-region beg (point))