Mercurial > emacs
diff lisp/gnus/gnus-util.el @ 96867:fe4950880bae
(ns-focus-frame): Remove declaration.
(gnus-select-frame-set-input-focus): Undo previous change. Treat ns
like x.
author | Dan Nicolaescu <dann@ics.uci.edu> |
---|---|
date | Mon, 21 Jul 2008 17:21:24 +0000 |
parents | 86b977a209f5 |
children | ef06f769799e |
line wrap: on
line diff
--- a/lisp/gnus/gnus-util.el Mon Jul 21 17:19:47 2008 +0000 +++ b/lisp/gnus/gnus-util.el Mon Jul 21 17:21:24 2008 +0000 @@ -1593,7 +1593,6 @@ (declare-function x-focus-frame "xfns.c" (frame)) (declare-function w32-focus-frame "../term/w32-win" (frame)) -(declare-function ns-focus-frame "nsfns.m" (frame)) (defun gnus-select-frame-set-input-focus (frame) "Select FRAME, raise it, and set input focus, if possible." @@ -1610,12 +1609,10 @@ (t (raise-frame frame) (select-frame frame) - (cond ((memq window-system '(x mac)) + (cond ((memq window-system '(x ns mac)) (x-focus-frame frame)) ((eq window-system 'w32) - (w32-focus-frame frame)) - ((eq window-system 'ns) - (ns-focus-frame frame))) + (w32-focus-frame frame))) (when focus-follows-mouse (set-mouse-position frame (1- (frame-width frame)) 0)))))