Mercurial > emacs
changeset 85269:7fdf1d7a2fb4
Do not use a single clause cond.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Sat, 13 Oct 2007 17:57:47 +0000 |
| parents | d0de3022445d |
| children | 1372ee106c78 |
| files | lisp/frame.el |
| diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/frame.el Sat Oct 13 16:50:36 2007 +0000 +++ b/lisp/frame.el Sat Oct 13 17:57:47 2007 +0000 @@ -821,9 +821,9 @@ (raise-frame frame) ;; Ensure, if possible, that frame gets input focus. (when (memq (window-system frame) '(x mac w32)) - (x-focus-frame frame)) - (cond (focus-follows-mouse - (set-mouse-position (selected-frame) (1- (frame-width)) 0)))) + (x-focus-frame frame)) + (when focus-follows-mouse + (set-mouse-position (selected-frame) (1- (frame-width)) 0))) (defun other-frame (arg) "Select the ARGth different visible frame on current display, and raise it.