diff options
| author | Juri Linkov <juri@linkov.net> | 2021-08-22 11:44:55 +0300 |
|---|---|---|
| committer | Juri Linkov <juri@linkov.net> | 2021-08-22 11:46:08 +0300 |
| commit | dd7d966eb40b58a221ea29930582b8173ea87ee2 (patch) | |
| tree | 4cbe3d05f0f2d471e2c2d824825935158417b1a1 /lisp/mouse.el | |
| parent | 654e096b09378b2b0d1cdc9b8c0634bf5f3c9306 (diff) | |
| download | emacs-dd7d966eb40b58a221ea29930582b8173ea87ee2.tar.gz emacs-dd7d966eb40b58a221ea29930582b8173ea87ee2.tar.bz2 emacs-dd7d966eb40b58a221ea29930582b8173ea87ee2.zip | |
Don't show menu titles with the text property 'hide' (bug#50067)
* lisp/mouse.el (context-menu-map): Add menu title "Context Menu"
propertized with the text property 'hide'.
* src/menu.c (x_popup_menu_1): Don't show the title with the non-nil
text property 'hide' on GTK and NS.
Diffstat (limited to 'lisp/mouse.el')
| -rw-r--r-- | lisp/mouse.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el index 3441a4787e6..7cdea34d865 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -304,7 +304,7 @@ the same menu with changes such as added new menu items." (defun context-menu-map () "Return composite menu map." - (let ((menu (make-sparse-keymap))) + (let ((menu (make-sparse-keymap (propertize "Context Menu" 'hide t)))) (run-hook-wrapped 'context-menu-functions (lambda (fun) (setq menu (funcall fun menu)) |