aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/automated/elisp-mode-tests.el10
1 files changed, 9 insertions, 1 deletions
diff --git a/test/automated/elisp-mode-tests.el b/test/automated/elisp-mode-tests.el
index 26f903dbd0c..bfecfe7dc6b 100644
--- a/test/automated/elisp-mode-tests.el
+++ b/test/automated/elisp-mode-tests.el
@@ -84,7 +84,7 @@
84 (should (member "bar" comps)) 84 (should (member "bar" comps))
85 (should (member "baz" comps))))) 85 (should (member "baz" comps)))))
86 86
87(ert-deftest completest-variables-in-let-bindings () 87(ert-deftest elisp-completest-variables-in-let-bindings ()
88 (dolist (text '("(let (ba" "(let* ((ba")) 88 (dolist (text '("(let (ba" "(let* ((ba"))
89 (with-temp-buffer 89 (with-temp-buffer
90 (emacs-lisp-mode) 90 (emacs-lisp-mode)
@@ -93,5 +93,13 @@
93 (should (member "backup-inhibited" comps)) 93 (should (member "backup-inhibited" comps))
94 (should-not (member "backup-buffer" comps)))))) 94 (should-not (member "backup-buffer" comps))))))
95 95
96(ert-deftest elisp-completes-functions-after-let-bindings ()
97 (with-temp-buffer
98 (emacs-lisp-mode)
99 (insert "(let ((bar 1) (baz 2)) (ba")
100 (let ((comps (elisp--test-completions)))
101 (should (member "backup-buffer" comps))
102 (should-not (member "backup-inhibited" comps)))))
103
96(provide 'elisp-mode-tests) 104(provide 'elisp-mode-tests)
97;;; elisp-mode-tests.el ends here 105;;; elisp-mode-tests.el ends here