Mercurial > emacs
changeset 30249:fb30df0ff4ab
(mouse-major-mode-menu-1): get the submenu with lookup-key.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sun, 16 Jul 2000 17:14:52 +0000 |
| parents | c969af4a71a7 |
| children | bf443dabe303 |
| files | lisp/mouse.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/mouse.el Sun Jul 16 15:31:10 2000 +0000 +++ b/lisp/mouse.el Sun Jul 16 17:14:52 2000 +0000 @@ -115,7 +115,7 @@ (if (eq submap t) menubar (setq mouse-major-mode-menu-prefix (list (car submap))) - (cdr (cdr submap)))))) + (lookup-key menubar (vector (car submap))))))) ;; Commands that operate on windows. @@ -309,7 +309,7 @@ ;; ;; if size change caused space to be stolen ;; from a window above this one, rescind the - ;; change, but only if we didn't grow/srhink + ;; change, but only if we didn't grow/shrink ;; the minibuffer. minibuffer size changes ;; can cause all windows to shrink... no way ;; around it.