diff options
| -rw-r--r-- | test/lisp/progmodes/elisp-mode-tests.el | 12 | ||||
| -rw-r--r-- | test/manual/indent/elisp.el | 6 |
2 files changed, 12 insertions, 6 deletions
diff --git a/test/lisp/progmodes/elisp-mode-tests.el b/test/lisp/progmodes/elisp-mode-tests.el index 2de533e5eb9..6c30e4f664b 100644 --- a/test/lisp/progmodes/elisp-mode-tests.el +++ b/test/lisp/progmodes/elisp-mode-tests.el | |||
| @@ -810,5 +810,17 @@ to (xref-elisp-test-descr-to-target xref)." | |||
| 810 | (insert "?\\N{HEAVY CHECK MARK}") | 810 | (insert "?\\N{HEAVY CHECK MARK}") |
| 811 | (should (equal (elisp--preceding-sexp) ?\N{HEAVY CHECK MARK})))) | 811 | (should (equal (elisp--preceding-sexp) ?\N{HEAVY CHECK MARK})))) |
| 812 | 812 | ||
| 813 | (ert-deftest elisp-indent-basic () | ||
| 814 | (with-temp-buffer | ||
| 815 | (emacs-lisp-mode) | ||
| 816 | (let ((orig "(defun x () | ||
| 817 | (print (quote ( thingy great | ||
| 818 | stuff))) | ||
| 819 | (print (quote (thingy great | ||
| 820 | stuff))))")) | ||
| 821 | (insert orig) | ||
| 822 | (indent-region (point-min) (point-max)) | ||
| 823 | (should (equal (buffer-string) orig))))) | ||
| 824 | |||
| 813 | (provide 'elisp-mode-tests) | 825 | (provide 'elisp-mode-tests) |
| 814 | ;;; elisp-mode-tests.el ends here | 826 | ;;; elisp-mode-tests.el ends here |
diff --git a/test/manual/indent/elisp.el b/test/manual/indent/elisp.el deleted file mode 100644 index 7d634ae84c9..00000000000 --- a/test/manual/indent/elisp.el +++ /dev/null | |||
| @@ -1,6 +0,0 @@ | |||
| 1 | ;; -*- lexical-binding:t -*- | ||
| 2 | (defun x () | ||
| 3 | (print (quote ( thingy great | ||
| 4 | stuff))) | ||
| 5 | (print (quote (thingy great | ||
| 6 | stuff)))) | ||