浏览代码

org-clock: Fix ignored integer values for `org-clock-into-drawer'

* lisp/org-clock.el (org-clock-into-drawer): Fix ignored integer
  values.

Reported-by: Rainer Stengele <rainer.stengele@online.de>
<http://permalink.gmane.org/gmane.emacs.orgmode/95504>
Nicolas Goaziou 10 年之前
父节点
当前提交
18685d9852
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      lisp/org-clock.el

+ 1 - 0
lisp/org-clock.el

@@ -87,6 +87,7 @@ Return value is either a string, an integer, or nil."
           ((org-string-nw-p p)
 	   (if (org-string-match-p "\\`[0-9]+\\'" p) (string-to-number p) p))
 	  ((org-string-nw-p org-clock-into-drawer))
+	  ((integerp org-clock-into-drawer) org-clock-into-drawer)
 	  ((not org-clock-into-drawer) nil)
 	  ((org-log-into-drawer))
 	  (t "LOGBOOK"))))