[Emacs-diffs] master f6bdbdf: (completion-lisp-mode-hook): Use completion-separator-chars

[Stefan Monnier]

branch: master
commit f6bdbdf1f58d8fda61bc901b852d25fdf1a1f9da
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>

    (completion-lisp-mode-hook): Use completion-separator-chars
    
    * lisp/completion.el (completion-lisp-mode-hook):
    Use completion-separator-chars rather than local key binding.
---
 lisp/completion.el |    9 +++------
 1 files changed, 3 insertions(+), 6 deletions(-)

diff --git a/lisp/completion.el b/lisp/completion.el
index d3f1187..b53f2d3 100644
--- a/lisp/completion.el
+++ b/lisp/completion.el
@@ -2228,12 +2228,9 @@ TYPE is the type of the wrapper to be added.  Can be 
:before or :under."
 (defun completion-lisp-mode-hook ()
   (setq completion-syntax-table completion-lisp-syntax-table)
   ;; Lisp Mode diffs
-  (local-set-key "!" 'self-insert-command)
-  (local-set-key "&" 'self-insert-command)
-  (local-set-key "%" 'self-insert-command)
-  (local-set-key "?" 'self-insert-command)
-  (local-set-key "=" 'self-insert-command)
-  (local-set-key "^" 'self-insert-command))
+  (setq-local completion-separator-chars
+              (cl-set-difference completion-separator-chars
+                                 (append "!&%?=^" nil))))
 
 ;; C mode diffs.