Skip to content

Add a windows desktop style desktop notification #106

Description

@Horrih

Hello,
Thank you for your amazing package.
In your README you suggested using the notifications package for desktop notifications.

However your package seems to be used by some popular packages out there, like org-alert for example.
Would it be possible to include a built-in style for windows desktop notifications ?

As an example (i'm an elisp newbie), here is what I ended up doing in my own init.el, using the built-in w32-notification-notify

(use-package alert
  :config
  ;; Add the windows desktop notifications if on windows
  (when (eq system-type 'windows-nt)
    (alert-define-style
     'windows-desktop-notification-style
     :title "Windows Desktop Notification style"
     :notifier
     (lambda (info)
       (let ((notif-id (w32-notification-notify :title (plist-get info :title) :body (plist-get info :message))))
         ;; Close it after 3 seconds (no new notification can be sent if left unclosed)
         (run-with-timer 3 nil `(lambda() (w32-notification-close ,notif-id))))))
    (setq alert-default-style 'windows-desktop-notification-style)))

Thank you for your amazing work for the emacs community

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions