aboutsummaryrefslogtreecommitdiff
path: root/tests.el
diff options
context:
space:
mode:
Diffstat (limited to 'tests.el')
-rw-r--r--tests.el14
1 files changed, 14 insertions, 0 deletions
diff --git a/tests.el b/tests.el
index c79cfc4..0c520d8 100644
--- a/tests.el
+++ b/tests.el
@@ -25,3 +25,17 @@
"Test a method given a bad set of keywords"
(should-error
(stack-core-make-request "questions" '(()))))
+
+(ert-deftest test-data-filter-1 ()
+ "Test the meta-convenience function"
+ (should
+ (equal
+ '((1 . t) (2 . [1 2]) (3))
+ (stack-core-filter-data '((0 . 3)
+ (1 . t)
+ (a . five)
+ (2 . [1 2])
+ ("5" . bop)
+ (3)
+ (p . 4))
+ '(1 2 3)))))