Function: mouse-select-window
mouse-select-window is an interactive and byte-compiled function
defined in mouse.el.gz.
Signature
(mouse-select-window CLICK)
Documentation
Select the window clicked on; don't move point.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/mouse.el.gz
(defun mouse-select-window (click)
"Select the window clicked on; don't move point."
(interactive "e")
(mouse-minibuffer-check click)
(let ((oframe (selected-frame))
(frame (window-frame (posn-window (event-start click)))))
(select-window (posn-window (event-start click)))
(raise-frame frame)
(select-frame frame)
(or (eq frame oframe)
(set-mouse-position (selected-frame) (1- (frame-width)) 0))))