From: Stefan Monnier Date: Sat, 25 May 2013 03:08:04 +0000 (-0400) Subject: * lisp/emacs-lisp/lisp.el (lisp-completion-at-point): Don't burp at EOB. X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~2026^2~184 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=df76dacbd1f6830c96cf63053efe776d40c0e84d;p=emacs.git * lisp/emacs-lisp/lisp.el (lisp-completion-at-point): Don't burp at EOB. Fixes: debbugs:14446 --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 57625ef4dbe..efa6f06cbb1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -2,6 +2,7 @@ * emacs-lisp/lisp.el (lisp-completion-at-point): Don't use error-completion on the first 2 args of condition-case (bug#14446). + Don't burp at EOB. 2013-05-25 Leo Liu diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el index ce8f45e9730..b221d2f823d 100644 --- a/lisp/emacs-lisp/lisp.el +++ b/lisp/emacs-lisp/lisp.el @@ -726,7 +726,7 @@ considered." (let ((tail (if (null (car table-etc)) (cdr table-etc) (cons - (if (memq (char-syntax (char-after end)) + (if (memq (char-syntax (or (char-after end) ?\s)) '(?\s ?>)) (cadr table-etc) (apply-partially 'completion-table-with-terminator