From: Nick Roberts <nickrob@snap.net.nz>
To: rms@gnu.org
Cc: emacs-devel@gnu.org
Subject: Re: menu-bar-map variable
Date: Sun, 1 Apr 2007 21:11:16 +1200 [thread overview]
Message-ID: <17935.30516.272171.376755@farnswood.snap.net.nz> (raw)
In-Reply-To: <E1HXkPJ-0003bK-Sx@fencepost.gnu.org>
Richard Stallman writes:
> > There is a feature by which a minor mode can turn off specific global
> > menu items. It should be in the manual.
>
> Unfortunately tmm-menubar-mouse doesn't seem to work with this feature
> (items that are no longer visible get selected).
>
> Can someone fix this?
I can localise the problem to tmm-get-keybind and these two lines:
(setq allbind (cons (local-key-binding keyseq) allbind))
(setq allbind (cons (global-key-binding keyseq) allbind))
If I remove a menu-item in the global map e.g file
(define-key global-map [menu-bar file] 'undefined)
the tmm handles this properly as the entry is removed from
(global-key-binding [menu-bar]):
(keymap (file . undefined)...
However, if I remove a menu-item in the local map, e.g, edit in the scratch
buffer:
(define-key lisp-interaction-mode-map [menu-bar edit] 'undefined)
then I get:
(local-key-binding [menu-bar])
(keymap (edit . undefined))
but tmm still thinks it's there because it's still in the global list
(global-key-binding [menu-bar]):
...(edit "Edit" keymap (undo ...
^^^^
Perhaps Emacs has it's own function to handle this.
There is no corresponding problem with a graphical display.
--
Nick http://www.inet.net.nz/~nickrob
next prev parent reply other threads:[~2007-04-01 9:11 UTC|newest]
Thread overview: 8+ messages / expand[flat|nested] mbox.gz Atom feed top
2007-03-30 6:52 menu-bar-map variable Nick Roberts
2007-03-30 21:22 ` Richard Stallman
2007-03-31 6:10 ` Nick Roberts
2007-03-31 20:42 ` Richard Stallman
2007-04-01 9:11 ` Nick Roberts [this message]
2007-04-01 21:42 ` Richard Stallman
2007-04-03 21:37 ` Nick Roberts
2007-04-04 14:02 ` Richard Stallman
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=17935.30516.272171.376755@farnswood.snap.net.nz \
--to=nickrob@snap.net.nz \
--cc=emacs-devel@gnu.org \
--cc=rms@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.