diff options
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/menu-bar.el | 3 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 1eaad1f0061..fbf76180037 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,5 +1,9 @@ | |||
| 1 | 2008-03-11 Stefan Monnier <monnier@iro.umontreal.ca> | 1 | 2008-03-11 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 2 | ||
| 3 | * menu-bar.el (minibuffer-local-map): Use the same command for the | ||
| 4 | "Quit" menu as used for the C-g key, so the shortcut displayed is C-g. | ||
| 5 | Prefer RET over C-j for exit-minibuffer. | ||
| 6 | |||
| 3 | * files.el (display-buffer-other-frame): Eliminate problematic code. | 7 | * files.el (display-buffer-other-frame): Eliminate problematic code. |
| 4 | 8 | ||
| 5 | * menu-bar.el (menu-bar-update-buffers-maxbuf): Remove. | 9 | * menu-bar.el (menu-bar-update-buffers-maxbuf): Remove. |
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el index 6ed2e4904f7..46c6b598c6d 100644 --- a/lisp/menu-bar.el +++ b/lisp/menu-bar.el | |||
| @@ -1714,10 +1714,11 @@ Buffers menu is regenerated." | |||
| 1714 | 1714 | ||
| 1715 | (let ((map minibuffer-local-map)) | 1715 | (let ((map minibuffer-local-map)) |
| 1716 | (define-key map [menu-bar minibuf quit] | 1716 | (define-key map [menu-bar minibuf quit] |
| 1717 | (list 'menu-item "Quit" 'keyboard-escape-quit | 1717 | (list 'menu-item "Quit" 'abort-recursive-edit |
| 1718 | :help "Abort input and exit minibuffer")) | 1718 | :help "Abort input and exit minibuffer")) |
| 1719 | (define-key map [menu-bar minibuf return] | 1719 | (define-key map [menu-bar minibuf return] |
| 1720 | (list 'menu-item "Enter" 'exit-minibuffer | 1720 | (list 'menu-item "Enter" 'exit-minibuffer |
| 1721 | :key-sequence "\r" | ||
| 1721 | :help "Terminate input and exit minibuffer")) | 1722 | :help "Terminate input and exit minibuffer")) |
| 1722 | (define-key map [menu-bar minibuf isearch-forward] | 1723 | (define-key map [menu-bar minibuf isearch-forward] |
| 1723 | (list 'menu-item "Isearch History Forward" 'isearch-forward | 1724 | (list 'menu-item "Isearch History Forward" 'isearch-forward |