From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 27 Sep 2021 03:57:04 +0000 (+0200)
Subject: Move test-cl-flet-indentation to the right file
X-Git-Tag: emacs-28.0.90~582
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d31e56046b1d9d1fae597e299eb223d80ab7488e;p=emacs.git

Move test-cl-flet-indentation to the right file
---

diff --git a/test/lisp/emacs-lisp/lisp-mode-tests.el b/test/lisp/emacs-lisp/lisp-mode-tests.el
index 5e533b370ed..e2cecdf6b01 100644
--- a/test/lisp/emacs-lisp/lisp-mode-tests.el
+++ b/test/lisp/emacs-lisp/lisp-mode-tests.el
@@ -330,16 +330,5 @@ Expected initialization file: `%s'\"
       (faceup-clean-buffer)
       (should (faceup-test-font-lock-buffer 'emacs-lisp-mode faceup)))))
 
-(ert-deftest test-cl-flet-indentation ()
-  (should (equal
-           (with-temp-buffer
-             (lisp-mode)
-             (insert "(cl-flet ((bla (x)\n(* x x)))\n(bla 42))")
-             (indent-region (point-min) (point-max))
-             (buffer-string))
-            "(cl-flet ((bla (x)
-	       (* x x)))
-  (bla 42))")))
-
 (provide 'lisp-mode-tests)
 ;;; lisp-mode-tests.el ends here
diff --git a/test/lisp/progmodes/elisp-mode-tests.el b/test/lisp/progmodes/elisp-mode-tests.el
index fbf264a715f..e0e2cb112eb 100644
--- a/test/lisp/progmodes/elisp-mode-tests.el
+++ b/test/lisp/progmodes/elisp-mode-tests.el
@@ -1105,6 +1105,16 @@ evaluation of BODY."
     (should (= 84 (funcall (intern-soft "f-test4---"))))
     (should (unintern "f-test4---"))))
 
+(ert-deftest test-cl-flet-indentation ()
+  (should (equal
+           (with-temp-buffer
+             (emacs-lisp-mode)
+             (insert "(cl-flet ((bla (x)\n(* x x)))\n(bla 42))")
+             (indent-region (point-min) (point-max))
+             (buffer-string))
+           "(cl-flet ((bla (x)
+	    (* x x)))
+  (bla 42))")))
 
 (provide 'elisp-mode-tests)
 ;;; elisp-mode-tests.el ends here