diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-01-31 12:46:50 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2015-01-31 12:46:50 +0100 |
commit | a752684bf0368ddea1f6480157e770c0dd57b7a5 (patch) | |
tree | 510e40e9fd6f084454270355bceb8130f86bab9d | |
parent | 37fc8667e08bb1fbfd238de28b53bf484d67f9fb (diff) | |
download | org-mode-a752684bf0368ddea1f6480157e770c0dd57b7a5.tar.gz |
org-clock: Fix `org-clock-in-last' with universal argument
* lisp/org-clock.el (org-clock-in-last): `org-clock-in' expects an
universal argument, not the return value of `org-clock-select-task'.
Reported-by: Peter Münster <pmlists@free.fr>
<http://permalink.gmane.org/gmane.emacs.orgmode/94331>
-rw-r--r-- | lisp/org-clock.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/org-clock.el b/lisp/org-clock.el index c772dd9..07f02b0 100644 --- a/lisp/org-clock.el +++ b/lisp/org-clock.el @@ -1349,8 +1349,7 @@ With three universal prefix arguments, interactively prompt for a todo state to switch to, overriding the existing value `org-clock-in-switch-to-state'." (interactive "P") - (if (equal arg '(4)) - (org-clock-in (org-clock-select-task)) + (if (equal arg '(4)) (org-clock-in arg) (let ((start-time (if (or org-clock-continuously (equal arg '(16))) (or org-clock-out-time (org-current-time org-clock-rounding-minutes t)) |