diff options
author | Roberto Huelga Díaz <rhuelga@gmail.com> | 2013-09-03 11:53:15 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2013-09-06 16:01:22 +0200 |
commit | 54d805aed441713386593d8e6967b44568dfef18 (patch) | |
tree | e4a995dbf779e29b61f7a5349b9648f542948bce | |
parent | 41da6e14d02789643b1f98ae82e34cbb0a07c887 (diff) | |
download | org-mode-54d805aed441713386593d8e6967b44568dfef18.tar.gz |
Timer: play a sound as configured by `org-clock-sound' actualy only beep
* lisp/org-timer.el (org-timer-set-timer): Use the variable
`org-clock-sound' when calling `org-notify'.
When org-notify second parameter is t we only get the standard beep.
Evaluating with coma we can use different sounds for differents
running timers, as `org-clock-sound' was set when
`org-timer-set-timer' get execute
Patch proposal by Roberto Huelga Díaz.
TINYCHANGE
-rw-r--r-- | lisp/org-timer.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-timer.el b/lisp/org-timer.el index 2351c4c..2ea1c35 100644 --- a/lisp/org-timer.el +++ b/lisp/org-timer.el @@ -429,7 +429,7 @@ replace any running timer." (run-with-timer secs nil `(lambda () (setq org-timer-current-timer nil) - (org-notify ,(format "%s: time out" hl) t) + (org-notify ,(format "%s: time out" hl) ,org-clock-sound) (setq org-timer-timer-is-countdown nil) (org-timer-set-mode-line 'off) (run-hooks 'org-timer-done-hook)))) |