Mercurial > emacs
changeset 8678:0107ce4d48af
(completion-before-command): Don't call get on a non-symbol.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 01 Sep 1994 06:12:38 +0000 |
| parents | d41510c69a3f |
| children | ccfc2ca24a90 |
| files | lisp/completion.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/completion.el Thu Sep 01 04:47:05 1994 +0000 +++ b/lisp/completion.el Thu Sep 01 06:12:38 1994 +0000 @@ -2540,7 +2540,8 @@ (cmpl-statistics-block (record-complete-failed)))) (defun completion-before-command () - (funcall (or (get this-command 'completion-function) + (funcall (or (and (symbolp this-command) + (get this-command 'completion-function)) 'use-completion-under-or-before-point))) (add-hook 'pre-command-hook 'completion-before-command)