Commit e333fb10 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

* lisp/emacs-lisp/lisp.el (lisp-completion-at-point): Complete var names for

let-bindings.
parent 85527ff3
2013-10-17 Stefan Monnier <monnier@iro.umontreal.ca> 2013-10-17 Stefan Monnier <monnier@iro.umontreal.ca>
* emacs-lisp/lisp.el (lisp-completion-at-point): Complete var names for
let-bindings.
* progmodes/sh-script.el (sh-find-prev-matching): Disable SMIE's * progmodes/sh-script.el (sh-find-prev-matching): Disable SMIE's
forward-sexp-function while we redo its job (bug#15613). forward-sexp-function while we redo its job (bug#15613).
......
...@@ -867,6 +867,17 @@ considered." ...@@ -867,6 +867,17 @@ considered."
(< (point) beg))))) (< (point) beg)))))
(list t obarray (list t obarray
:predicate (lambda (sym) (get sym 'error-conditions)))) :predicate (lambda (sym) (get sym 'error-conditions))))
((and ?\(
(guard (save-excursion
(goto-char (1- beg))
(up-list -1)
(forward-symbol -1)
(looking-at "\\_<let\\*?\\_>"))))
(list t obarray
:predicate #'boundp
:company-doc-buffer #'lisp--company-doc-buffer
:company-docsig #'lisp--company-doc-string
:company-location #'lisp--company-location))
(_ (list nil obarray (_ (list nil obarray
:predicate #'fboundp :predicate #'fboundp
:company-doc-buffer #'lisp--company-doc-buffer :company-doc-buffer #'lisp--company-doc-buffer
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment