andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

gnus-notifications.el (gnus-notifications-notify): Use photo-file as app-icon

Browse source
This commit is contained in:
Julien Danjou 2013-05-16 22:31:47 +00:00 • committed by Katsumi Yamaoka
parent 04d360e7bb
commit 46cd302842
2 changed files with 9 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2013-05-16 Julien Danjou <julien@danjou.info>
* gnus-notifications.el (gnus-notifications-notify): Use photo-file as
app-icon.
2013-05-15 Glenn Morris <rgm@gnu.org>
* shr-color.el (shr-color-visible-luminance-min)

8
lisp/gnus/gnus-notifications.el
View file

@ -92,12 +92,12 @@ Return a notification id if any, or t on success."
:body subject
:actions '("read" "Read")
:on-action 'gnus-notifications-action
:app-icon (gnus-funcall-no-warning
'image-search-load-path "gnus/gnus.png")
:app-icon (or photo-file
(gnus-funcall-no-warning
'image-search-load-path "gnus/gnus.png"))
:app-name "Gnus"
:category "email.arrived"
:timeout gnus-notifications-timeout
:image-path photo-file)
:timeout gnus-notifications-timeout)
(message "New message from %s: %s" from subject)
;; Don't return an id
t))