|
From: | Chris Moore |
Subject: | Re: invalid-function ('use-completion-backward) |
Date: | Tue, 24 Jan 2006 20:25:41 +0100 |
Chris Moore wrote:
My .emacs contains a single line:
(dynamic-completion-mode)
If the first thing I do upon starting Emacs is type:
"C-x C-f backspace"
then I see an error message:
Error in pre-command-hook: (invalid-function ((quote
use-completion-backward)))
I believe that the folowing patch should fix this. I can install if
desired.
===File ~/completion-diff===================================
*** completion.el 02 Dec 2005 16:17:17 -0600 1.55
--- completion.el 24 Jan 2006 11:27:18 -0600
***************
*** 82,88 ****
;; 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
;; (default: ~/.completions). When you exit, Emacs saves a copy of the
;; completions that you
--- 82,88 ----
;; 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
;; (default: ~/.completions). When you exit, Emacs saves a copy of the
;; completions that you
***************
*** 2250,2262 ****
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))))))
(defun use-completion-minibuffer-separator ()
(let ((completion-syntax-table completion-standard-syntax-table))
--- 2250,2263 ----
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))))))
(defun use-completion-minibuffer-separator ()
(let ((completion-syntax-table completion-standard-syntax-table))
============================================================
[Prev in Thread] | Current Thread | [Next in Thread] |