diff options
Diffstat (limited to 'tests/tests.hs')
| -rw-r--r-- | tests/tests.hs | 3 |
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" + |