[gnus git] branch master updated: m0-7-13-g6a2843a =1= gnus-notifications: use photo-file as app-icon

Julien Danjou <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  6a2843ac1260897fd7b4ae3c422b32fa83d37778 (commit)
      from  ef1326b8002fb0513ee5ff9c522b26ab6bf41587 (commit)


- Log -----------------------------------------------------------------
commit 6a2843ac1260897fd7b4ae3c422b32fa83d37778
Author: Julien Danjou <[email protected]>
Date:   Thu May 16 17:51:47 2013 +0200

    gnus-notifications: use photo-file as app-icon
    
    Signed-off-by: Julien Danjou <[email protected]>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ca0a60d..24967e8 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-05-16  Julien Danjou  <[email protected]>
+
+	* gnus-notifications.el (gnus-notifications-notify): Use photo-file as
+	app-icon.
+
 2013-05-15  Glenn Morris  <[email protected]>
 
 	* shr-color.el (shr-color-visible-luminance-min)
diff --git a/lisp/gnus-notifications.el b/lisp/gnus-notifications.el
index f29bdb7..93220ed 100644
--- a/lisp/gnus-notifications.el
+++ b/lisp/gnus-notifications.el
@@ -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))

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog             |    5 +++++
 lisp/gnus-notifications.el |    8 ++++----
 2 files changed, 9 insertions(+), 4 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.