diff options
author | Kyle Meyer <kyle@kyleam.com> | 2014-12-01 02:02:19 -0500 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2014-12-09 10:09:38 +0100 |
commit | dc460fcad145ff81e22129d50bea2132250c15b2 (patch) | |
tree | 45d5f97bd5603c8029c2dfc72e3d6495121de1c0 | |
parent | 65cef8dce43c1f99705a3178caea24ee5ebeaa62 (diff) | |
download | org-mode-dc460fcad145ff81e22129d50bea2132250c15b2.tar.gz |
org-timer.el (org-timer): Recognize double prefix
* lisp/org-timer.el (org-timer): Follow the behavior described in the
docstring for a double prefix argument.
-rw-r--r-- | lisp/org-timer.el | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/lisp/org-timer.el b/lisp/org-timer.el index d02362c..c9710ca 100644 --- a/lisp/org-timer.el +++ b/lisp/org-timer.el @@ -177,11 +177,13 @@ that was not started at the correct moment. If NO-INSERT-P is non-nil, return the string instead of inserting it in the buffer." (interactive "P") - (when (or (equal restart '(4)) (not org-timer-start-time)) - (org-timer-start)) - (if no-insert-p - (org-timer-value-string) - (insert (org-timer-value-string)))) + (if (equal restart '(16)) + (org-timer-start restart) + (when (or (equal restart '(4)) (not org-timer-start-time)) + (org-timer-start)) + (if no-insert-p + (org-timer-value-string) + (insert (org-timer-value-string))))) (defun org-timer-value-string () "Set the timer string." |