|
@@ -156,6 +156,7 @@ With prefix arg STOP, stop it entirely."
|
|
|
(org-timer-set-mode-line 'pause)
|
|
|
(message "Timer paused at %s" (org-timer-value-string)))))
|
|
|
|
|
|
+(defvar org-timer-current-timer nil)
|
|
|
(defun org-timer-stop ()
|
|
|
"Stop the relative timer."
|
|
|
(interactive)
|
|
@@ -347,7 +348,6 @@ VALUE can be `on', `off', or `pause'."
|
|
|
(concat " <" (substring (org-timer-value-string) 0 -1) ">"))
|
|
|
(force-mode-line-update)))
|
|
|
|
|
|
-(defvar org-timer-current-timer nil)
|
|
|
(defun org-timer-cancel-timer ()
|
|
|
"Cancel the current timer."
|
|
|
(interactive)
|