Ver Fonte

org-clock.el: Handle notification on windows-nt

* lisp/org-clock.el (org-show-notification): Handle notification
on windows-nt.

TINYCHANGE
Edward Sillador há 5 anos atrás
pai
commit
8dd2984a94
1 ficheiros alterados com 5 adições e 0 exclusões
  1. 5 0
      lisp/org-clock.el

+ 5 - 0
lisp/org-clock.el

@@ -823,6 +823,11 @@ use libnotify if available, or fall back on a message."
 	((executable-find "notify-send")
 	 (start-process "emacs-timer-notification" nil
 			"notify-send" notification))
+	((string-equal system-type "windows-nt")
+	 (w32-notification-close (w32-notification-notify
+				  :title "Org mode message"
+				  :body notification
+				  :urgency 'low)))
 	;; Maybe the handler will send a message, so only use message as
 	;; a fall back option
 	(t (message "%s" notification))))