Mercurial > emacs
changeset 32327:140165e85530
([header-line mouse-1]): Bind to mouse-select-window.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Mon, 09 Oct 2000 10:21:32 +0000 |
| parents | b8132c394173 |
| children | 66df0c812955 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 5 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Mon Oct 09 02:29:48 2000 +0000 +++ b/lisp/mouse.el Mon Oct 09 10:21:32 2000 +0000 @@ -2156,10 +2156,15 @@ ;; Replaced with dragging mouse-1 ;; (global-set-key [S-mouse-1] 'mouse-set-mark) +;; Binding mouse-1 to mouse-select-window when on mode-, header-, or +;; vertical-line prevents Emacs from signaling an error when the mouse +;; button is released after dragging these lines, on non-toolkit +;; versions. (global-set-key [mode-line mouse-1] 'mouse-select-window) (global-set-key [mode-line drag-mouse-1] 'mouse-select-window) (global-set-key [mode-line down-mouse-1] 'mouse-drag-mode-line) (global-set-key [header-line down-mouse-1] 'mouse-drag-header-line) +(global-set-key [header-line mouse-1] 'mouse-select-window) (global-set-key [mode-line mouse-2] 'mouse-delete-other-windows) (global-set-key [mode-line mouse-3] 'mouse-delete-window) (global-set-key [mode-line C-mouse-2] 'mouse-split-window-horizontally)