branch: elpa/pacmacs
commit 4b086059947f7500b5d7436b62d1ff7df6a3821d
Author: rexim <[email protected]>
Commit: rexim <[email protected]>
UTs for duration frame logic. Close #60
---
test/pacman-anim-test.el | 3 +++
1 file changed, 3 insertions(+)
diff --git a/test/pacman-anim-test.el b/test/pacman-anim-test.el
index a55ffe85df..abc7125e72 100644
--- a/test/pacman-anim-test.el
+++ b/test/pacman-anim-test.el
@@ -16,6 +16,9 @@
(number-sequence 1 4))
:current-frame 2
:duration-counter 0)))
+ (pacmacs-anim-next-frame anim 50)
+ (should (equal 2 (plist-get anim :current-frame)))
+
(pacmacs-anim-next-frame anim 100)
(should (equal 3 (plist-get anim :current-frame)))
