9f61ffd · typeable/mandrill

git.iko.soy/typeable/mandrill

on master help sign in

remove commented code, add doco

9f61ffdMark Wotton10 years ago

README.md+8

compare with master

unifiedsplit

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

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

78 + ping2.json

79 + senders.json

80+

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

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

81 + send.json

82 + send.json

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+

83# Testing online API

91# Testing online API

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

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

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

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

43verifyDomain k email =

44 toMandrillResponse VerifyDomain

45 (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)