emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/pacmacs d3c94de6da 320/472: Remove UT for pacmacs--track-p


From: ELPA Syncer
Subject: [nongnu] elpa/pacmacs d3c94de6da 320/472: Remove UT for pacmacs--track-point (#159)
Date: Thu, 6 Jan 2022 21:59:35 -0500 (EST)

branch: elpa/pacmacs
commit d3c94de6dace97eb6c9d4fda0c288c0b2655ad29
Author: rexim <reximkut@gmail.com>
Commit: rexim <reximkut@gmail.com>

    Remove UT for pacmacs--track-point (#159)
---
 test/pacmacs-test.el | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/test/pacmacs-test.el b/test/pacmacs-test.el
index f2be579b06..6f92501aac 100644
--- a/test/pacmacs-test.el
+++ b/test/pacmacs-test.el
@@ -7,20 +7,6 @@
     (should (not (pacmacs--cell-tracked-p 0 0)))
     (should (pacmacs--cell-tracked-p 1 0))))
 
-(ert-deftest pacmacs--track-point-test ()
-  (let ((pacmacs--track-board (list :width 2
-                                     :height 2
-                                     :data [[nil nil]
-                                            [nil nil]])))
-    (pacmacs--track-point (cons 0 0) (cons 0 1))
-    (should (equal [[right nil]
-                    [nil nil]]
-                   (plist-get pacmacs--track-board :data)))
-    (pacmacs--track-point (cons 1 0) (cons 1 -1))
-    (should (equal [[right nil]
-                    [left nil]]
-                   (plist-get pacmacs--track-board :data)))))
-
 (ert-deftest pacmacs--track-object-test ()
   (let ((pacmacs--track-board (list :width 2
                                      :height 2



reply via email to

[Prev in Thread] Current Thread [Next in Thread]