branch: externals/org
commit b80b0a517de7be94c70d3d6537899a94ac046fab
Author: stardiviner <numbch...@gmail.com>
Commit: Bastien <b...@gnu.org>
org-clock.el: Make org-notify support macOS notification
* lisp/org-clock.el (org-show-notification): Add support for macOS
notification.
---
lisp/org-clock.el | 4 ++++
1 file changed, 4 insertions(+)
diff --git a/lisp/org-clock.el b/lisp/org-clock.el
index 9877607..acd1dd3 100644
--- a/lisp/org-clock.el
+++ b/lisp/org-clock.el
@@ -859,6 +859,10 @@ use libnotify if available, or fall back on a message."
org-show-notification-timeout
nil
(lambda () (w32-notification-close id)))))
+ ((fboundp 'ns-do-applescript)
+ (ns-do-applescript
+ (format "display notification \"%s\" with title \"Org mode
notification\""
+ (replace-regexp-in-string "\"" "#" notification))))
((fboundp 'notifications-notify)
(notifications-notify
:title "Org mode message"
