Browse Source

More test coverage

master
Stephen Starkey 2 years ago
parent
commit
017dd41912
  1. 6
      test/clj/email_counter/test/emails.clj

6
test/clj/email_counter/test/emails.clj

@ -11,6 +11,8 @@
(are [expected given] (= expected (parse-email given))
nil nil
nil ""
nil "one@two@three"
"wow.yo" "wow.yo"
"+wow@gmail.com" "+wow@gmail.com"
"me@here.com" "me@here.com "
"m.e@here.com" "\n\t m.e@here.com"
@ -22,6 +24,8 @@
nil nil
nil ""
nil "+wow@gmail.com"
nil "wow.yo"
nil "one@two@three"
"me@here.com" "me@here.com"
"me@here.com" "m.e@here.com"
"me@here.com" "me+you@here.com"
@ -40,5 +44,7 @@
"you@there.com"
"you+me@there.com"
"+wow@gmail.com"
"wow.yo"
"one@two@three"
""
nil]))))
Loading…
Cancel
Save