ryuslash/emacs-config
1
0
Fork 0
Code Activity

Update settings for oni-alert

Browse source
This commit is contained in:
Tom Willemse 2020-01-21 23:14:41 -08:00
parent cd603d16fe
commit 00228c6a1a
1 changed files with 8 additions and 5 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
oni-alert.el
View file

@ -4,7 +4,7 @@
;; Author: Tom Willemse <tom@ryuslash.org>
;; Keywords: local
;; Version: 2019.0904.210205
;; Version: 2020.0121.231217
;; Package-Requires: (alert)
;; This program is free software; you can redistribute it and/or modify
@ -29,11 +29,14 @@
(require 'alert)
(if (eql system-type 'windows-nt)
(progn
(setq alert-default-icon "c:/Users/WillemsenT/Emacs-25.1-2/share/emacs/25.1/etc/images/icons/hicolor/48x48/apps/emacs.png")
(let ((emacs-icon (expand-file-name (concat "../share/emacs/" emacs-version "/etc/images/icons/hicolor/48x48/apps/emacs.png") invocation-directory)))
(setq alert-default-icon emacs-icon)
(setq alert-default-style 'toaster)
(setq alert-toaster-command "U:/projects/toaster/toast/bin/Release/toast.exe")
(setq alert-toaster-default-icon "c:/Users/WillemsenT/Emacs-25.1-2/share/emacs/25.1/etc/images/icons/hicolor/48x48/apps/emacs.png"))
(setq alert-toaster-command
(car (cl-remove-if (lambda (loc) (not (file-exists-p loc)))
' ("~/source/repos/toaster/toast/bin/Release/toast.exe"
"U:/projects/toaster/toast/bin/Release/toast.exe"))))
(setq alert-toaster-default-icon emacs-icon))
(setq alert-default-style 'libnotify))
;;;###autoload(with-eval-after-load 'alert (require 'oni-alert))