[nongnu] elpa/pacmacs b6141dc8e3 175/472: UT for pacmacs--anim-object-list-next-frame

[ELPA Syncer]

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

    UT for pacmacs--anim-object-list-next-frame
---
 test/pacmacs-anim-test.el | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/test/pacmacs-anim-test.el b/test/pacmacs-anim-test.el
index 4e08f0fdea..b4465ce23e 100644
--- a/test/pacmacs-anim-test.el
+++ b/test/pacmacs-anim-test.el
@@ -97,3 +97,8 @@
      (mock (pacmacs-load-image *) => input-sprite-sheet)
      (should (equal expected-output
                     (pacmacs-load-anim "foo"))))))
+
+(ert-deftest pacmacs--anim-object-list-next-frame-test ()
+  (with-mock
+   (mock (pacmacs--anim-object-next-frame 42 43) :times 5)
+   (pacmacs--anim-object-list-next-frame (make-list 5 42) 43)))