Convert manual indent test for elisp-mode into unit test
* test/manual/indent/elisp.el: Delete file. * test/lisp/progmodes/elisp-mode-tests.el (elisp-indent-basic): New unit test based on deleted file.
This commit is contained in:
parent
12ca463833
commit
f3e2d3418a
2 changed files with 12 additions and 6 deletions
|
@ -810,5 +810,17 @@ to (xref-elisp-test-descr-to-target xref)."
|
|||
(insert "?\\N{HEAVY CHECK MARK}")
|
||||
(should (equal (elisp--preceding-sexp) ?\N{HEAVY CHECK MARK}))))
|
||||
|
||||
(ert-deftest elisp-indent-basic ()
|
||||
(with-temp-buffer
|
||||
(emacs-lisp-mode)
|
||||
(let ((orig "(defun x ()
|
||||
(print (quote ( thingy great
|
||||
stuff)))
|
||||
(print (quote (thingy great
|
||||
stuff))))"))
|
||||
(insert orig)
|
||||
(indent-region (point-min) (point-max))
|
||||
(should (equal (buffer-string) orig)))))
|
||||
|
||||
(provide 'elisp-mode-tests)
|
||||
;;; elisp-mode-tests.el ends here
|
||||
|
|
|
@ -1,6 +0,0 @@
|
|||
;; -*- lexical-binding:t -*-
|
||||
(defun x ()
|
||||
(print (quote ( thingy great
|
||||
stuff)))
|
||||
(print (quote (thingy great
|
||||
stuff))))
|
Loading…
Add table
Reference in a new issue