unofficial mirror of emacs-devel@gnu.org 
 help / color / mirror / code / Atom feed
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

  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

  List information: https://www.gnu.org/software/emacs/

* 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 public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).