Mercurial > emacs
changeset 76389:dea4a6c39682
(PC-bindings): Rebind M-TAB in read-expression-map.
author | Chong Yidong <cyd@stupidchicken.com> |
---|---|
date | Thu, 08 Mar 2007 14:50:59 +0000 |
parents | f96010398e67 |
children | 6f253cc8e06e |
files | lisp/complete.el |
diffstat | 1 files changed, 4 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/complete.el Thu Mar 08 14:50:53 2007 +0000 +++ b/lisp/complete.el Thu Mar 08 14:50:59 2007 +0000 @@ -147,6 +147,8 @@ (cond ((not bind) ;; These bindings are the default bindings. It would be better to ;; restore the previous bindings. + (define-key read-expression-map "\e\t" 'lisp-complete-symbol) + (define-key completion-map "\t" 'minibuffer-complete) (define-key completion-map " " 'minibuffer-complete-word) (define-key completion-map "?" 'minibuffer-completion-help) @@ -159,6 +161,8 @@ (define-key global-map [remap lisp-complete-symbol] nil)) (PC-default-bindings + (define-key read-expression-map "\e\t" 'PC-lisp-complete-symbol) + (define-key completion-map "\t" 'PC-complete) (define-key completion-map " " 'PC-complete-word) (define-key completion-map "?" 'PC-completion-help)