@@ -37,7 +37,7 @@
3737module Network.PagerDuty.Integration
3838 (
3939 -- * Events
40− submit
40+ send
4141
4242 -- ** Trigger
4343 , Trigger
@@ -269,8 +269,9 @@ rDescription = _Resolve.gDescription
269269rDetails :: Lens' Resolve Object
270270rDetails = _Resolve.gDetails
271271
272−submit :: (MonadIO m, Event a) => Manager -> a -> m (Either Error Response)
273−submit x m = request m (Object payload) $ def
272+-- | Send an event to the integration API.
273+send :: (MonadIO m, Event a) => Manager -> a -> m (Either Error Response)
274+send x m = request m (Object payload) $ def
274275 & Lens.host .~ "events.pagerduty.com"
275276 & Lens.path .~ "/generic/2010-04-15/create_event.json"
276277 where