mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-27 10:54:40 +00:00
Code Issues Releases Activity

(completion-lisp-mode-hook): Use completion-separator-chars

Browse Source 
* lisp/completion.el (completion-lisp-mode-hook):
Use completion-separator-chars rather than local key binding.
This commit is contained in:
Stefan Monnier 2015-04-13 10:35:15 -04:00
parent c9d78e18c6
commit f6bdbdf1f5
1 changed files with 3 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lisp/completion.el
View File

@ -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.