git.iko.soy/typeable/pagerduty
on develop help sign in
Ensuring compilation
commita384b2fe7e378fc21b9ce7133194c7ad0b5007b5 authorBrendan Hay <brendan.g.hay@gmail.com> dateThu 2 Oct 2014, 18:05 (12 years ago) parent031ad05
2 files changed+11−10
compare with develop
unifiedsplit
src/Network/PagerDuty/REST/LogEntries.hs+4−3 src/Network/PagerDuty/REST/MaintenanceWindows.hs+7−7
src/Network/PagerDuty/REST/LogEntries.hs+4−3
@@ -114,11 +114,12 @@ import Control.Lens
114114import Data.Aeson
115115import Data.Aeson.Lens
116116import Data.Default
117−import qualified Data.HashMap.Strict as Map
118−import Data.Text (Text)
119−import qualified Data.Text as Text
117+import qualified Data.HashMap.Strict as Map
118+import Data.Text (Text)
119+import qualified Data.Text as Text
120120import Data.Time
121121import Network.HTTP.Types
122+import Network.PagerDuty.REST.Users (User)
122123import Network.PagerDuty.TH
123124import Network.PagerDuty.Types
124125
src/Network/PagerDuty/REST/MaintenanceWindows.hs+7−7
@@ -24,8 +24,8 @@ module Network.PagerDuty.REST.MaintenanceWindows
2424 , lwServiceIds
2525 , lwFilter
2626
27− , ListwindowsResponse
28− , lwMatenanceWindows
27+ , ListWindowsResponse
28+ , lwMaintenanceWindows
2929 , lwCounts
3030
3131 -- * Create Window
@@ -146,7 +146,7 @@ deriveRecord ''ListWindowsResponse
146146-- | List existing maintenance windows, optionally filtered by service,
147147-- or whether they are from the past, present or future.
148148--
149−-- @GET maintenance_windows@
149+-- @GET \/maintenance_windows@
150150--
151151-- See: <http://developer.pagerduty.com/documentation/rest/maintenance_windows/list>
152152listWindows :: Request ListWindows s ListWindowsResponse
@@ -196,7 +196,7 @@ cwServiceIds = upd.cwMaintenanceWindow'.cwServiceIds'
196196-- | Create a new maintenance window for the specified services. No new
197197-- incidents will be created for a service that is currently in maintenance.
198198--
199−-- @POST maintenance_windows@
199+-- @POST \/maintenance_windows@
200200--
201201-- See: <http://developer.pagerduty.com/documentation/rest/maintenance_windows/create>
202202createWindow :: RequesterId
@@ -227,7 +227,7 @@ createWindowBasic s e xs =
227227
228228-- | Get details about an existing maintenance window.
229229--
230−-- @GET maintenance_windows/:id@
230+-- @GET \/maintenance_windows\/\:id@
231231--
232232-- See: <http://developer.pagerduty.com/documentation/rest/maintenance_windows/show>
233233getWindow :: WindowId -> Request Empty s MaintenanceWindow
@@ -265,7 +265,7 @@ uwServiceIds = upd.uwServiceIds'
265265
266266-- | Update an existing maintenance window.
267267--
268−-- @PUT maintenance_windows/:id@
268+-- @PUT \/maintenance_windows\/\:id@
269269--
270270-- See: <http://developer.pagerduty.com/documentation/rest/maintenance_windows/update>
271271updateWindow :: WindowId -> Request UpdateWindow s MaintenanceWindow
@@ -280,7 +280,7 @@ updateWindow w =
280280
281281-- | Cancel or delete an existing maintenance window.
282282--
283−-- @DELETE maintenance_windows/:id@
283+-- @DELETE \/maintenance_windows\/\:id@
284284--
285285-- See: <http://developer.pagerduty.com/documentation/rest/maintenance_windows/delete>
286286deleteWindow :: WindowId -> Request Empty s Empty