>From b567a21d3039be1f1c82f35057543440ba074760 Mon Sep 17 00:00:00 2001 From: rasmus Date: Sat, 7 Mar 2015 18:10:03 +0100 Subject: [PATCH 1/2] gnus-notifications: Raise frame when clicking Read * gnus-notifications.el (gnus-notifications-action): Raise window frame. --- lisp/ChangeLog | 5 +++++ lisp/gnus-notifications.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 2047481..b6526b7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2015-03-07 Rasmus Pank Roulund + + * gnus-notifications.el (gnus-notifications-action): Raise window + frame. + 2015-02-26 Katsumi Yamaoka * gnus-art.el (gnus-mime-inline-part, gnus-mm-display-part): diff --git a/lisp/gnus-notifications.el b/lisp/gnus-notifications.el index 2941cc4..1ed344e 100644 --- a/lisp/gnus-notifications.el +++ b/lisp/gnus-notifications.el @@ -80,7 +80,8 @@ not get notifications." (when group-article (let ((group (cadr group-article)) (article (nth 2 group-article))) - (gnus-fetch-group group (list article))))))) + (gnus-fetch-group group (list article)) + (when (window-system) (x-focus-frame (selected-frame)))))))) (defun gnus-notifications-notify (from subject photo-file) "Send a notification about a new mail. -- 2.3.1