diff options
| -rw-r--r-- | lisp/progmodes/elisp-mode.el | 2 | ||||
| -rw-r--r-- | test/automated/elisp-mode-tests.el | 9 |
2 files changed, 10 insertions, 1 deletions
diff --git a/lisp/progmodes/elisp-mode.el b/lisp/progmodes/elisp-mode.el index e12d1331601..9494e97fa73 100644 --- a/lisp/progmodes/elisp-mode.el +++ b/lisp/progmodes/elisp-mode.el | |||
| @@ -460,7 +460,7 @@ It can be quoted, or be inside a quoted form." | |||
| 460 | (beg (condition-case nil | 460 | (beg (condition-case nil |
| 461 | (save-excursion | 461 | (save-excursion |
| 462 | (backward-sexp 1) | 462 | (backward-sexp 1) |
| 463 | (skip-chars-forward "`',‘") | 463 | (skip-chars-forward "`',‘#") |
| 464 | (point)) | 464 | (point)) |
| 465 | (scan-error pos))) | 465 | (scan-error pos))) |
| 466 | (end | 466 | (end |
diff --git a/test/automated/elisp-mode-tests.el b/test/automated/elisp-mode-tests.el index 7af6dfcdc03..85f6da22441 100644 --- a/test/automated/elisp-mode-tests.el +++ b/test/automated/elisp-mode-tests.el | |||
| @@ -78,6 +78,15 @@ | |||
| 78 | (should (member "backup-buffer" comps)) | 78 | (should (member "backup-buffer" comps)) |
| 79 | (should-not (member "backup-inhibited" comps)))))) | 79 | (should-not (member "backup-inhibited" comps)))))) |
| 80 | 80 | ||
| 81 | (ert-deftest elisp-completes-functions-after-hash-quote () | ||
| 82 | (ert-deftest elisp-completes-functions-after-let-bindings () | ||
| 83 | (with-temp-buffer | ||
| 84 | (emacs-lisp-mode) | ||
| 85 | (insert "#'ba") | ||
| 86 | (let ((comps (elisp--test-completions))) | ||
| 87 | (should (member "backup-buffer" comps)) | ||
| 88 | (should-not (member "backup-inhibited" comps)))))) | ||
| 89 | |||
| 81 | (ert-deftest elisp-completes-local-variables () | 90 | (ert-deftest elisp-completes-local-variables () |
| 82 | (with-temp-buffer | 91 | (with-temp-buffer |
| 83 | (emacs-lisp-mode) | 92 | (emacs-lisp-mode) |