all messages for Emacs-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* bug#14975: 24.3; org-mode's `org-clock-notify-once-if-expired' doesn't respect `org-clock-sound'
@ 2013-07-28 13:49 Oleh
  2013-07-30 10:46 ` Bastien
  2013-07-30 10:46 ` Bastien
  0 siblings, 2 replies; 15+ messages in thread
From: Oleh @ 2013-07-28 13:49 UTC (permalink / raw)
  To: 14975

[-- Attachment #1: Type: text/plain, Size: 137 bytes --]

Currently, this function behaves unconditionally
as if `org-clock-sound' was set to t.

I attach a patch of how I fixed it for my needs:

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: patch --]
[-- Type: text/x-diff, Size: 847 bytes --]

From db2cc63bbdd4e51bd7a150186b131a39d7d10a6e Mon Sep 17 00:00:00 2001
From: oleh <wave@mail.ua>
Date: Sun, 28 Jul 2013 15:39:57 +0200
Subject: [PATCH] org-clock.el: `org-clock-notify-once-if-expired' respects
 `org-clock-sound'.

---
 lisp/org-clock.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index 8ac215e..99479b2 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -718,7 +718,7 @@ Notification is shown only once."
 	    (setq org-clock-notification-was-shown t)
 	    (org-notify
 	     (format "Task '%s' should be finished by now. (%s)"
-		     org-clock-heading org-clock-effort) t))
+		     org-clock-heading org-clock-effort) org-clock-sound))
 	(setq org-clock-notification-was-shown nil)))))
 
 (defun org-notify (notification &optional play-sound)
-- 
1.8.1.2


[-- Attachment #3: Type: text/plain, Size: 18 bytes --]


regards,
Oleh




^ permalink raw reply related	[flat|nested] 15+ messages in thread

end of thread, other threads:[~2013-07-30 21:39 UTC | newest]

Thread overview: 15+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2013-07-28 13:49 bug#14975: 24.3; org-mode's `org-clock-notify-once-if-expired' doesn't respect `org-clock-sound' Oleh
2013-07-30 10:46 ` Bastien
2013-07-30 10:50   ` Bastien
2013-07-30 15:53     ` Glenn Morris
2013-07-30 15:53     ` Glenn Morris
2013-07-30 17:22       ` Bastien
2013-07-30 17:27         ` Glenn Morris
2013-07-30 17:27         ` Glenn Morris
2013-07-30 18:24           ` Stefan Monnier
2013-07-30 18:24           ` Stefan Monnier
2013-07-30 20:54           ` Bastien
2013-07-30 20:54           ` Bastien
2013-07-30 17:22       ` Bastien
2013-07-30 10:50   ` Bastien
2013-07-30 10:46 ` Bastien

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/emacs.git
	https://git.savannah.gnu.org/cgit/emacs/org-mode.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.