From: Adam Sjøgren Date: Sun, 8 Mar 2015 22:45:06 +0000 (+0000) Subject: lisp/gnus/gnus-notifications.el (gnus-notifications-action): Replace x-focus-frame... X-Git-Tag: emacs-25.0.90~2564^2~197 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=6b134bcba9de5605086ee9382c0be13174480cac;p=emacs.git lisp/gnus/gnus-notifications.el (gnus-notifications-action): Replace x-focus-frame kludge by calling gnus-select-frame-set-input-focus --- diff --git a/lisp/gnus/gnus-notifications.el b/lisp/gnus/gnus-notifications.el index 22dba3570a3..f73aac1f5b3 100644 --- a/lisp/gnus/gnus-notifications.el +++ b/lisp/gnus/gnus-notifications.el @@ -81,7 +81,7 @@ not get notifications." (article (nth 2 group-article))) (cond ((string= key "read") (gnus-fetch-group group (list article)) - (when (and window-system (fboundp 'x-focus-frame)) (x-focus-frame (selected-frame)))) + (gnus-select-frame-set-input-focus (selected-frame))) ((string= key "mark-read") (gnus-update-read-articles group