Re: Changes for emacs 28

[Juri Linkov]

>> If the menu-bar isn't displayed then we could display the Hamburger icon
>> in the tool-bar, and clicking on it will pop-up the menu with items from
>> the menu-bar, so users won't need to display both menu-bar and tool-bar.
>
> If the menu bar isn't displayed, C-mouse-3 already displays a menu
> that shows all the top-level menu-bar items.  So we don't really need
> the Hamburger icon (but it wouldn't hurt to have it, of course --
> provided they don't disable the tool bar as well...)

Yes, this is useful when they don't disable the tool bar,
then the Hamburger menu will look like this:

with this patch:

diff --git a/lisp/tool-bar.el b/lisp/tool-bar.el
index 7df1e28e06..3bb8f70ca1 100644
--- a/lisp/tool-bar.el
+++ b/lisp/tool-bar.el
@@ -249,6 +249,16 @@ tool-bar-local-item-from-menu
 (defun tool-bar-setup ()
   (setq tool-bar-separator-image-expression
        (tool-bar--image-expression "separator"))
+
+  (let ((tool-bar-map (default-value 'tool-bar-map)))
+    (tool-bar-add-item "newsticker/narrow"
+                       (lambda ()
+                        (interactive)
+                        (popup-menu (mouse-menu-bar-map)))
+                      'menu-bar
+                      :visible '(zerop (or (frame-parameter nil 
'menu-bar-lines) 0))
+                      :vert-only t
+                      :help "Pop up the global menu bar"))
   (tool-bar-add-item-from-menu 'find-file "new" nil :label "New File"
                               :vert-only t)
   (tool-bar-add-item-from-menu 'menu-find-file-existing "open" nil