diff options
author | Morgan Astra <m@morganastra.me> | 2017-03-04 23:13:18 -0800 |
---|---|---|
committer | Morgan Astra <m@morganastra.me> | 2017-03-04 23:13:18 -0800 |
commit | fedfc3ae45b2f6aca60f5b26fa163768e0a67d55 (patch) | |
tree | 5784c63e89428857f86959d14d4b0186aae6a7f2 /test | |
parent | 87c042fd5780e453c336eca1cea9a85793bc77c4 (diff) | |
parent | 5e851322b2e862c9a4c4018413d8b7fb67a31428 (diff) |
Merge branch 'release/v1.11'
Diffstat (limited to 'test')
-rw-r--r-- | test/pronouns/pages_test.clj | 10 |
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 []) => "") |