Re: Tip: tty mode-line popup menus

[Stefan Kangas]

Gerd Möllmann <gerd.moellmann@gmail.com> writes:

> I don't like the tty behavior. It is fiddly with a track pad, which I
> normally use, leading to inadvertent menu selections. Furthermore,
> keyboard operation of the menu seems impossible.
>
> To fix this, I've added this in my init.el:
>
>   (defun my-fix-mode-line-map (map)
>     (let* ((down-mouse (kbd "<mode-line> <down-mouse-1>"))
>          (mouse (kbd "<mode-line> <mouse-1>"))
>          (def (lookup-key map down-mouse)))
>       (when def
>       (define-key map down-mouse nil)
>       (define-key map mouse def))))
>
>   (my-fix-mode-line-map mode-line-major-mode-keymap)
>   (my-fix-mode-line-map mode-line-minor-mode-keymap)

How about adding a defcustom for this behavior?

I guess many users are on laptops with trackpads these days, and would
find that convenient.