diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2013-10-17 00:49:42 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2013-10-17 00:49:42 -0400 |
| commit | e333fb100ba1eac0533a58be233695317d68b5a3 (patch) | |
| tree | 2c315f2e9c08f1cb4e4a218395c9a16ed7767b46 | |
| parent | 85527ff309fc9ac5fbda80b119f021719902cc7c (diff) | |
| download | emacs-e333fb100ba1eac0533a58be233695317d68b5a3.tar.gz | |
* lisp/emacs-lisp/lisp.el (lisp-completion-at-point): Complete var names for
let-bindings.
| -rw-r--r-- | lisp/ChangeLog | 3 | ||||
| -rw-r--r-- | lisp/emacs-lisp/lisp.el | 11 |
2 files changed, 14 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index bbff921661d..6f8636c8bd8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 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 forward-sexp-function while we redo its job (bug#15613). diff --git a/lisp/emacs-lisp/lisp.el b/lisp/emacs-lisp/lisp.el index 11891679202..1350af1a563 100644 --- a/lisp/emacs-lisp/lisp.el +++ b/lisp/emacs-lisp/lisp.el @@ -867,6 +867,17 @@ considered." (< (point) beg))))) (list t obarray :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 :predicate #'fboundp :company-doc-buffer #'lisp--company-doc-buffer |