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.

diff --git a/test/lisp/progmodes/elisp-mode-tests.el b/test/lisp/progmodes/elisp-mode-tests.el
index 2de533e5eb92017d2c992751b925f4f3fd7da515..6c30e4f664bf23eda3eb83bad27aa55f426263d5 100644 (file)
--- 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)."
     (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

diff --git a/test/manual/indent/elisp.el b/test/manual/indent/elisp.el
deleted file mode 100644 (file)
index 7d634ae..0000000
--- a/test/manual/indent/elisp.el
+++ /dev/null
@@ -1,6 +0,0 @@
-;; -*- lexical-binding:t -*-
-(defun x ()
-  (print (quote ( thingy great
-                 stuff)))
-  (print (quote (thingy great
-                       stuff))))