]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix test in python-tests.el added by bug #62092
authorkobarity <kobarity@gmail.com>
Tue, 15 Aug 2023 13:27:45 +0000 (22:27 +0900)
committerMattias EngdegÄrd <mattiase@acm.org>
Tue, 15 Aug 2023 15:07:10 +0000 (17:07 +0200)
* test/lisp/progmodes/python-tests.el
(python-info-dedenter-opening-block-positions-6): Fix indentation.
(python-info-dedenter-opening-block-positions-7): Add calling
`should'.  Add RESTORE-POINT argument when calling
`python-tests-look-at'.

test/lisp/progmodes/python-tests.el

index 54e32cbf07b92135c761bd3db3193b50af07b80e..9f935f2748c8521c6772226bc39499825fce87f8 100644 (file)
@@ -5973,9 +5973,9 @@ def func():
         else
 "
    (python-tests-look-at "else\n")
-    (should
-     (equal (list (python-tests-look-at "if (" -1 t))
-            (python-info-dedenter-opening-block-positions)))))
+   (should
+    (equal (list (python-tests-look-at "if (" -1 t))
+           (python-info-dedenter-opening-block-positions)))))
 
 (ert-deftest python-info-dedenter-opening-block-positions-7 ()
   "Test case blocks."
@@ -5993,9 +5993,9 @@ match a:
    (python-tests-look-at "case 2:")
    (should-not (python-info-dedenter-opening-block-positions))
    (python-tests-look-at "case 3:")
-   (equal (list (python-tests-look-at "case 2:" -1)
-                (python-tests-look-at "case 1:" -1 t))
-            (python-info-dedenter-opening-block-positions))))
+   (should (equal (list (python-tests-look-at "case 2:" -1 t)
+                        (python-tests-look-at "case 1:" -1 t))
+                  (python-info-dedenter-opening-block-positions)))))
 
 (ert-deftest python-info-dedenter-opening-block-message-1 ()
   "Test dedenters inside strings are ignored."