# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1173280126 0
# Node ID 7722d7feb5cc544cecfb54d125d595940c9dbe63
# Parent  bcb3f782f5ebd96f9b0f8a91b89ae526cd2dd82b
(PC-bindings): Remap lisp-complete-symbol to
PC-lisp-complete-symbol instead of binding M-TAB in global-map.

diff -r bcb3f782f5eb -r 7722d7feb5cc lisp/complete.el
--- a/lisp/complete.el	Wed Mar 07 15:08:34 2007 +0000
+++ b/lisp/complete.el	Wed Mar 07 15:08:46 2007 +0000
@@ -157,7 +157,7 @@
 	   (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))
+	   (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,7 +181,7 @@
 	   (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)))))
+	   (define-key global-map [remap lisp-complete-symbol]	'PC-lisp-complete-symbol)))))
 
 ;;;###autoload
 (define-minor-mode partial-completion-mode