Merge branch 'maint'

This commit is contained in:
Nicolas Goaziou 2018-01-10 12:49:23 +01:00
commit 0c409d64d0
1 changed files with 2 additions and 1 deletions

View File

@ -1235,7 +1235,8 @@ the default behavior."
(when (equal select '(64))
;; Set start-time to `org-clock-out-time'
(let ((org-clock-continuously t))
(org-clock-in nil org-clock-out-time)))
(org-clock-in nil org-clock-out-time)
(throw 'abort nil)))
(when (equal select '(4))
(setq selected-task (org-clock-select-task "Clock-in on task: "))