diff options
author | Chong Yidong <cyd@gnu.org> | 2013-02-09 13:52:20 +0800 |
---|---|---|
committer | Chong Yidong <cyd@gnu.org> | 2013-02-09 13:52:20 +0800 |
commit | 123ecb68a0ba76a4f6b65c2a551e155022be2052 (patch) | |
tree | fcf847ecf192c86416d87b4c3cbcfa4326cf7d3a /lisp/minibuffer.el | |
parent | 044a9eac4e308c5095757672855bc3b018a00a6b (diff) | |
download | emacs-123ecb68a0ba76a4f6b65c2a551e155022be2052.tar.gz |
Bind view-echo-area-messages in minibuffer-inactive-mode-map.
* help.el (view-echo-area-messages): Use display-buffer.
* minibuffer.el (minibuffer-inactive-mode-map): Bind mouse-1 to
view-echo-area-messages.
Fixes: debbugs:13340
Diffstat (limited to 'lisp/minibuffer.el')
-rw-r--r-- | lisp/minibuffer.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index 0d2815e535e..e18f4c9c77f 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -2045,10 +2045,7 @@ with `minibuffer-local-must-match-map'.") (define-key map "i" 'info) (define-key map "m" 'mail) (define-key map "n" 'make-frame) - (define-key map [mouse-1] (lambda () (interactive) - (with-current-buffer "*Messages*" - (goto-char (point-max)) - (display-buffer (current-buffer))))) + (define-key map [mouse-1] 'view-echo-area-messages) ;; So the global down-mouse-1 binding doesn't clutter the execution of the ;; above mouse-1 binding. (define-key map [down-mouse-1] #'ignore) |