Re: org-show-notification of org-clock.el broken on MS Windows

[Tim Schumacher <tim@datenknoten.me>]

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

Hi Bastien,

On Sun, 26 Jan 2020 10:12:40 +0100,
Bastien wrote:

> > * The function org-show-notification should be more robust. It should not fail
> >   if it can't fire a notification for whatever reason.
>
> Please send a patch if needed for this.

I tried my best, check the attachedd patch.

> > * On MS Windows the function w32-notification-notify should be used.
>
> I just fixed this one:
> https://code.orgmode.org/bzg/org-mode/commit/8dd2984a

This actualy does not work, because the notification will be closed instantly
and it will never appear.

I'm currently in the process of writing a patch[1] to change that. The problem
is, that emacs give the notification a static id and if there is a notification
from your application with the same id windows wont spawn another notification,
because you can update the notification. My plan is, to genrate a GUID and use
that as its id, so that you can have multiple notifications and don't have to
close the notification. But this does not work yet, since my C skills are not as
good as it used to be.

Thanks for your work!

Tim


[1]
https://github.com/emacs-mirror/emacs/compare/master...enko:feature/notification-guid


[-- Attachment #2: 0001-org-clock.el-Check-if-dbus-is-available-for-notifica.patch --]
[-- Type: application/octet-stream, Size: 873 bytes --]

From dfcec69c7f9f89cbb34ed3f07cd5362961d80c53 Mon Sep 17 00:00:00 2001
From: Tim Schumacher <tim@datenknoten.me>
Date: Sun, 26 Jan 2020 12:14:26 +0100
Subject: [PATCH] org-clock.el: Check if dbus is available for
 notifications-notify

---
 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 7fb97f021..157d55509 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -813,7 +813,7 @@ use libnotify if available, or fall back on a message."
 	((stringp org-show-notification-handler)
 	 (start-process "emacs-timer-notification" nil
 			org-show-notification-handler notification))
-	((fboundp 'notifications-notify)
+	((and (fboundp 'dbus-compiled-version) (fboundp 'notifications-notify))
 	 (notifications-notify
 	  :title "Org mode message"
 	  :body notification
-- 
2.24.0.windows.1