* lisp/emacs-lisp/lisp.el (lisp-completion-at-point): Don't use

error-completion on the first 2 args of condition-case.

Fixes: debbugs:14446
This commit is contained in:
Stefan Monnier 2013-05-24 23:00:13 -04:00
parent 24d699fab1
commit c902337068
2 changed files with 10 additions and 1 deletions

View file

@ -714,7 +714,11 @@ considered."
(append
macro-declarations-alist
defun-declarations-alist)))))
((or `condition-case `condition-case-unless-debug)
((and (or `condition-case `condition-case-unless-debug)
(guard (save-excursion
(ignore-errors
(forward-sexp 2)
(< (point) beg)))))
(list t obarray
:predicate (lambda (sym) (get sym 'error-conditions))))
(_ (list nil obarray #'fboundp))))))))