[elpa] externals/org-notify f566817937 10/23: New notification type: "notify or window".

[ELPA Syncer]

branch: externals/org-notify
commit f5668179379d8d750536641c62cf23d3927957e6
Author: Peter Münster <pmrb@free.fr>
Commit: Peter Münster <pmrb@free.fr>

    New notification type: "notify or window".
---
 org-notify.el | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/org-notify.el b/org-notify.el
index 4a9ea8a242..2ad7a632b0 100644
--- a/org-notify.el
+++ b/org-notify.el
@@ -335,6 +335,13 @@ org-notify window. Mostly copied from 
`appt-select-lowest-window'."
     (setq org-notify-on-action-map
           (plist-put org-notify-on-action-map id plist))))
 
+(defun org-notify-action-notify/window (plist)
+  "For a graphics display, pop up a notification window, for a text
+terminal an emacs window."
+  (if (display-graphic-p)
+      (org-notify-action-notify plist)
+    (org-notify-action-window plist)))
+
 ;;; Provide a minimal default setup.
 (org-notify-add 'default '(:time "1h" :actions org-notify-action-message
                            :period "2m"))