Function: org-timer--run-countdown-timer
org-timer--run-countdown-timer is a byte-compiled function defined in
org-timer.el.gz.
Signature
(org-timer--run-countdown-timer SECS TITLE)
Documentation
Start countdown timer that will last SECS.
TITLE will be appended to the notification message displayed when time is up.
Source Code
;; Defined in /usr/src/emacs/lisp/org/org-timer.el.gz
(defun org-timer--run-countdown-timer (secs title)
"Start countdown timer that will last SECS.
TITLE will be appended to the notification message displayed when
time is up."
(let ((msg (format "%s: time out" title))
(sound org-clock-sound))
(run-with-timer
secs nil (lambda ()
(setq org-timer-countdown-timer nil
org-timer-start-time nil)
(org-notify msg sound)
(org-timer-set-mode-line 'off)
(run-hooks 'org-timer-done-hook)))))