Commit c8d8f322 authored by Daniel Pfeiffer's avatar Daniel Pfeiffer
Browse files

(Buffer-menu-make-sort-button) Make sorting by mouse-2 work from a different window.

parent d4c2c0ef
......@@ -625,7 +625,9 @@ For more information, see the function `buffer-menu'."
'mouse-face 'highlight
'keymap (let ((map (make-sparse-keymap)))
(define-key map [header-line mouse-2]
`(lambda () (interactive)
`(lambda (e)
(interactive "e")
(if e (set-buffer (window-buffer (posn-window (event-end e)))))
(Buffer-menu-sort ,column)))
map)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment