branch: elpa/popup
commit 9814c886bcb60e7893acd252e16c6c6e0ae96361
Author: yuuki arisawa <yuuki....@gmail.com>
Commit: yuuki arisawa <yuuki....@gmail.com>
Add test for test helper
---
tests/popup-test.el | 8 ++++++++
1 file changed, 8 insertions(+)
diff --git a/tests/popup-test.el b/tests/popup-test.el
index 986c3d3..9344944 100644
--- a/tests/popup-test.el
+++ b/tests/popup-test.el
@@ -90,6 +90,14 @@ into real text. Return *text* buffer"
(defun popup-test-helper-input (key)
(push key unread-command-events))
+;; Test for helper method
+(ert-deftest popup-test-test-helper ()
+ (should (eq (popup-test-helper-same-all-p '(0 0 0)) 0))
+ (should (eq (popup-test-helper-same-all-p '(1 1 1)) 1))
+ (should (eq (popup-test-helper-same-all-p '(0 1 1)) nil))
+ )
+
+;; Test for popup-el
(ert-deftest popup-test-simple ()
(popup-test-with-common-setup
(popup-set-list popup '("foo" "bar" "baz"))
