reddit / emacs

Simple but fun hamburger menus on the mode-line (beware if you hate hamburger menus)

fromadarkcontinent · 2022-08-30 01:30
Just concat this to your mode-line-format string `(:eval (propertize "[☰]" 'local-map (make-mode-line-mouse-map 'mouse-1 'menu-bar-open)))` https://i.redd.it/kqkmdxci7rk91.gif
Frumpagumpus · 2022-08-30 02:05
i like it
[deleted] · 2022-08-30 03:43
[removed]
link0ff · 2022-08-30 07:35
Nice, but better to bind it to `down-mouse-1`, then you can select a menu item with a singe click.
michaelhoffman · 2022-08-30 13:09
Suggested patch for true hamburger menus: -(:eval (propertize "[☰]" 'local-map (make-mode-line-mouse-map 'mouse-1 'menu-bar-open))) +(:eval (propertize "[🍔]" 'local-map (make-mode-line-mouse-map 'mouse-1 'menu-bar-open)))
Anktionaer · 2022-09-11 19:22
Nice, i stole this to make my own hamburger menu ```'(:propertize "[🍔]" local-map (keymap (mode-line keymap (down-mouse-1 menu-item "Options" (keymap (menu-bar-open menu-item "Buffer Menu" menu-bar-open :help "Menu Bar") (magit-status menu-item "Magit" magit-status :Help "Open Magit VCS") "Options" )))) face (:foreground "blue") mouse-face mode-line-highlight help-echo "Open Options Menu" )```
fromadarkcontinent · 2022-09-12 06:43
Nice I might steal that from you in revenge.