[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: partial-completion-mode and M-TAB
From: |
Kim F. Storm |
Subject: |
Re: partial-completion-mode and M-TAB |
Date: |
Wed, 07 Mar 2007 10:59:57 +0100 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.95 (gnu/linux) |
Richard Stallman <address@hidden> writes:
> M-x partial-completion-mode
>
> open some c file:
>
> M-TAB runs the command PC-lisp-complete-symbol
>
> The problem is the fact that partial-completion-mode rebinds this
> command. The clean way to do it would be by setting hooks. However,
> I guess there is no suitable hook in lisp-complete-symbol that can
> call a different general completion mechanism.
>
> As a stopgap, partial-completion-mode could rebind the command
> lisp-complete-symbol to PC-lisp-complete-symbol.
Does the following patch give good results?
*** complete.el 06 Mar 2007 09:16:28 +0100 1.60
--- complete.el 07 Mar 2007 10:59:08 +0100
***************
*** 157,163 ****
(define-key must-match-map "\n" 'minibuffer-complete-and-exit)
(define-key must-match-map "?" 'minibuffer-completion-help)
! (define-key global-map "\e\t" 'complete-symbol))
(PC-default-bindings
(define-key completion-map "\t" 'PC-complete)
(define-key completion-map " " 'PC-complete-word)
--- 157,163 ----
(define-key must-match-map "\n" 'minibuffer-complete-and-exit)
(define-key must-match-map "?" 'minibuffer-completion-help)
! (define-key global-map [remap lisp-complete-symbol] nil))
(PC-default-bindings
(define-key completion-map "\t" 'PC-complete)
(define-key completion-map " " 'PC-complete-word)
***************
*** 181,187 ****
(define-key must-match-map "\e\n" 'PC-complete-and-exit)
(define-key must-match-map "\e?" 'PC-completion-help)
! (define-key global-map "\e\t" 'PC-lisp-complete-symbol)))))
;;;###autoload
(define-minor-mode partial-completion-mode
--- 181,187 ----
(define-key must-match-map "\e\n" 'PC-complete-and-exit)
(define-key must-match-map "\e?" 'PC-completion-help)
! (define-key global-map [remap lisp-complete-symbol]
'PC-lisp-complete-symbol)))))
;;;###autoload
(define-minor-mode partial-completion-mode
--
Kim F. Storm <address@hidden> http://www.cua.dk