Nick Roberts wrote:
> It fails on Emacs 22 too (it would be best if you checked this first). I'm
> pretty sure it relates to my changes, but I'm not sure yet that the bug is
> in tmm.el. org-mode has an awesome menubar!
[...]
> Looking at the local map, I see the keyword keymap in the list many times but
> not as a car. Is that reasonable?
According to the lispref "Inheritance and Keymaps", yes. Eg:
(let ((map (make-sparse-keymap)))
(set-keymap-parent map text-mode-map)
map)
So how about this fix:
*** tmm.el 3 Apr 2007 10:09:45 -0000 1.52
--- tmm.el 12 Apr 2007 22:46:20 -0000
***************
*** 547,555 ****
;; the global list.
(dolist (minor minorbind)
(dolist (item (cdr minor))
! (setq globalbind (assq-delete-all (car item) globalbind))))
(dolist (item (cdr localbind))
! (setq globalbind (assq-delete-all (car item) globalbind)))
(setq globalbind (cons 'keymap globalbind))
(setq allbind (cons globalbind (cons localbind minorbind)))
--- 547,555 ----
;; the global list.
(dolist (minor minorbind)
(dolist (item (cdr minor))
! (setq globalbind (assq-delete-all (car-safe item) globalbind))))
(dolist (item (cdr localbind))
! (setq globalbind (assq-delete-all (car-safe item) globalbind)))
(setq globalbind (cons 'keymap globalbind))
(setq allbind (cons globalbind (cons localbind minorbind)))
_______________________________________________
emacs-pretest-bug mailing list
[EMAIL PROTECTED]
http://lists.gnu.org/mailman/listinfo/emacs-pretest-bug
