9f61ffd · typeable/mandrill

git.iko.soy/typeable/mandrill

remove commented code, add doco

commit9f61ffd92f01843dae05f57144affc16ba1df0d8 authorMark Wotton <mwotton@gmail.com> dateWed 11 May 2016, 09:17 (10 years ago) parent8622d4d

2 files changed+8−17

unifiedsplit

README.md+8

@@ -77,9 +77,17 @@ main = do

7777 + ~~ping.json~~ (as **doesn't return valid json!**)

7878 + ping2.json

7979 + senders.json

80+

8081 - [Messages call](https://mandrillapp.com/api/docs/messages.JSON.html)

8182 + send.json

8283

84+ - [Senders call](https://mandrillapp.com/api/docs/senders.JSON.html)

85+ + verify-domain.json

86+

87+ - [Inbound call](https://mandrillapp.com/api/docs/inbound.JSON.html)

88+ + add-route.json

89+ + add-domain.json

90+

8391# Testing online API

8492

8593To test the online API, first build the package with tests enabled:

src/Network/API/Mandrill/Senders.hs−17

@@ -43,20 +43,3 @@ verifyDomain :: MandrillKey

4343verifyDomain k email =

4444 toMandrillResponse VerifyDomain

4545 (VerifyDomainRq k (decodeUtf8 $ TEV.domainPart email) (decodeUtf8 $ TEV.localPart email))

46−-- addDomain :: MandrillKey

47−

48−-- addDomain k dom = toMandrillResponse DomainsAdd (DomainAddRq k dom)

49−

50−

51−

52−-- addRoute :: MandrillKey

53−-- -- ^ The API key

54−-- -> Text

55−-- -- ^ The domain to add

56−-- -> Text

57−-- -- ^ the pattern including wildcards

58−-- -> Text

59−-- -- ^ URL to forward to

60−-- -> Maybe Manager

61−-- -> IO (MandrillResponse RouteAddResponse)

62−-- addRoute k dom pattern forward = toMandrillResponse RoutesAdd (RouteAddRq k dom pattern forward)