[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/completion.el
From: |
Luc Teirlinck |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/completion.el |
Date: |
Wed, 25 Jan 2006 04:11:05 +0000 |
Index: emacs/lisp/completion.el
diff -u emacs/lisp/completion.el:1.55 emacs/lisp/completion.el:1.56
--- emacs/lisp/completion.el:1.55 Fri Dec 2 21:12:27 2005
+++ emacs/lisp/completion.el Wed Jan 25 04:11:05 2006
@@ -82,11 +82,11 @@
;; SAVING/LOADING COMPLETIONS
;; Completions are automatically saved from one session to another
;; (unless save-completions-flag or enable-completion is nil).
-;; Activating this minor-mode calling completion-initialize) causes Emacs
-;; to load a completions database for a saved completions file
+;; Activating this minor-mode (calling completion-initialize) loads
+;; a completions database for a saved completions file
;; (default: ~/.completions). When you exit, Emacs saves a copy of the
-;; completions that you
-;; often use. When you next start, Emacs loads in the saved completion file.
+;; completions that you often use. When you next start, Emacs loads in
+;; the saved completion file.
;;
;; The number of completions saved depends loosely on
;; *saved-completions-decay-factor*. Completions that have never been
@@ -2250,13 +2250,14 @@
TYPE is the type of the wrapper to be added. Can be :before or :under."
(put function-name 'completion-function
(cdr (assq type
- '((:separator 'use-completion-before-separator)
- (:before 'use-completion-before-point)
- (:backward-under 'use-completion-backward-under)
- (:backward 'use-completion-backward)
- (:under 'use-completion-under-point)
- (:under-or-before 'use-completion-under-or-before-point)
- (:minibuffer-separator
'use-completion-minibuffer-separator))))))
+ '((:separator . use-completion-before-separator)
+ (:before . use-completion-before-point)
+ (:backward-under . use-completion-backward-under)
+ (:backward . use-completion-backward)
+ (:under . use-completion-under-point)
+ (:under-or-before . use-completion-under-or-before-point)
+ (:minibuffer-separator
+ . use-completion-minibuffer-separator))))))
(defun use-completion-minibuffer-separator ()
(let ((completion-syntax-table completion-standard-syntax-table))
@@ -2354,7 +2355,7 @@
(if dynamic-completion-mode
(add-hook (car x) (cdr x))
(remove-hook (car x) (cdr x))))
-
+
;; "Complete" Key Keybindings. We don't want to use a minor-mode
;; map because these have too high a priority. We could/should
;; probably change the interpretation of minor-mode-map-alist such
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] Changes to emacs/lisp/completion.el,
Luc Teirlinck <=