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

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

[nongnu] elpa/pacmacs 7a713ac0b7 010/472: Add UTs again


From: ELPA Syncer
Subject: [nongnu] elpa/pacmacs 7a713ac0b7 010/472: Add UTs again
Date: Thu, 6 Jan 2022 21:59:01 -0500 (EST)

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

    Add UTs again
---
 test/pacman-test.el | 6 ++++++
 test/test-helper.el | 4 ++++
 2 files changed, 10 insertions(+)

diff --git a/test/pacman-test.el b/test/pacman-test.el
new file mode 100644
index 0000000000..b14ff48281
--- /dev/null
+++ b/test/pacman-test.el
@@ -0,0 +1,6 @@
+(ert-deftest pacman-anim-get-frame-test ()
+  (let ((anim (list :frames (number-sequence 1 5)
+                    :current-frame 2)))
+    (should (equal 3
+                   (pacman-anim-get-frame anim)
+                   ))))
diff --git a/test/test-helper.el b/test/test-helper.el
new file mode 100644
index 0000000000..840eac6771
--- /dev/null
+++ b/test/test-helper.el
@@ -0,0 +1,4 @@
+(require 'el-mock)
+
+(add-to-list 'load-path ".")
+(load "pacman.el")



reply via email to

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