emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org b80b0a5 51/85: org-clock.el: Make org-notify suppor


From: ELPA Syncer
Subject: [elpa] externals/org b80b0a5 51/85: org-clock.el: Make org-notify support macOS notification
Date: Mon, 27 Sep 2021 15:57:48 -0400 (EDT)

branch: externals/org
commit b80b0a517de7be94c70d3d6537899a94ac046fab
Author: stardiviner <numbchild@gmail.com>
Commit: Bastien <bzg@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"



reply via email to

[Prev in Thread] Current Thread [Next in Thread]