about summary refs log tree commit diff
path: root/test
diff options
context:
space:
mode:
authorMorgan Astra <m@morganastra.me>2017-03-04 23:13:18 -0800
committerMorgan Astra <m@morganastra.me>2017-03-04 23:13:18 -0800
commitfedfc3ae45b2f6aca60f5b26fa163768e0a67d55 (patch)
tree5784c63e89428857f86959d14d4b0186aae6a7f2 /test
parent87c042fd5780e453c336eca1cea9a85793bc77c4 (diff)
parent5e851322b2e862c9a4c4018413d8b7fb67a31428 (diff)
Merge branch 'release/v1.11'
Diffstat (limited to 'test')
-rw-r--r--test/pronouns/pages_test.clj10
1 files changed, 10 insertions, 0 deletions
diff --git a/test/pronouns/pages_test.clj b/test/pronouns/pages_test.clj
new file mode 100644
index 0000000..04c14ce
--- /dev/null
+++ b/test/pronouns/pages_test.clj
@@ -0,0 +1,10 @@
+(ns pronouns.pages-test
+  (:require [pronouns.pages :as pages]
+            [midje.sweet :refer :all]))
+
+(fact "prose-comma-list turns a list of strings into a prose list with commas"
+      (pages/prose-comma-list ["foo"]) => "foo"
+      (pages/prose-comma-list ["foo" "bar"]) => "foo and bar"
+      (pages/prose-comma-list ["foo" "bar" "baz"]) => "foo, bar, and baz"
+      (pages/prose-comma-list ["foo" "bar" "baz" "bobble"]) => "foo, bar, baz, and bobble"
+      (pages/prose-comma-list []) => "")