summaryrefslogtreecommitdiff
path: root/tests/tests.hs
diff options
context:
space:
mode:
Diffstat (limited to 'tests/tests.hs')
-rw-r--r--tests/tests.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/tests.hs b/tests/tests.hs
index 000d205..2964df0 100644
--- a/tests/tests.hs
+++ b/tests/tests.hs
@@ -2,3 +2,6 @@ import Network.Gravatar
main = do
print $ gravatar "dons@galois.com" == "http://www.gravatar.com/avatar.php?gravatar_id=f21827076a1d0725c4f4bd5a640102e9"
+
+ print $ (gravatarWith "dons@galois.com" (Just R) Nothing (Just "http://haskell.org") ) == "http://www.gravatar.com/avatar.php?gravatar_id=f21827076a1d0725c4f4bd5a640102e9&rating=R&default=http%3A%2F%2Fhaskell.org"
+