diff options
| author | Richard M. Stallman | 2004-12-13 19:41:34 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2004-12-13 19:41:34 +0000 |
| commit | ca0eea298f2ae9a1acaf24cf6dd690bd636ceadc (patch) | |
| tree | 26862514f6d65ececb560524a8006c142a6e746f | |
| parent | b9afd6dd84b59e8839827f8fa8aa15d199d8e948 (diff) | |
| download | emacs-ca0eea298f2ae9a1acaf24cf6dd690bd636ceadc.tar.gz emacs-ca0eea298f2ae9a1acaf24cf6dd690bd636ceadc.zip | |
(mode-line-buffer-identification-keymap):
Don't cancel the mode-line's usual down-mouse-1 binding.
| -rw-r--r-- | lisp/bindings.el | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/lisp/bindings.el b/lisp/bindings.el index c9415305e8b..a29f320a69f 100644 --- a/lisp/bindings.el +++ b/lisp/bindings.el | |||
| @@ -448,7 +448,6 @@ Menu of mode operations in the mode line.") | |||
| 448 | (let ((map (make-sparse-keymap))) | 448 | (let ((map (make-sparse-keymap))) |
| 449 | ;; Bind down- events so that the global keymap won't ``shine | 449 | ;; Bind down- events so that the global keymap won't ``shine |
| 450 | ;; through''. | 450 | ;; through''. |
| 451 | (define-key map [mode-line down-mouse-1] 'ignore) | ||
| 452 | (define-key map [mode-line mouse-1] 'mode-line-unbury-buffer) | 451 | (define-key map [mode-line mouse-1] 'mode-line-unbury-buffer) |
| 453 | (define-key map [header-line down-mouse-1] 'ignore) | 452 | (define-key map [header-line down-mouse-1] 'ignore) |
| 454 | (define-key map [header-line mouse-1] 'mode-line-unbury-buffer) | 453 | (define-key map [header-line mouse-1] 'mode-line-unbury-buffer) |