destroyDroplet :: DropletId -> DigitalOcean (Response Event)
destroyDroplet dropletId = do
  credentials <- creds
  get [uri| /droplets/{dropletId}/destroy{?credentials*} |]

---- /regions
destroyDroplet :: DropletId -> DigitalOcean (Response Event)
destroyDroplet dropletId = do
  credentials <- creds
  get [uri| /droplets/{dropletId}/destroy{?credentials*} |]

---- /regions
destroyDroplet dropletId = do
  credentials <- creds
  get [uri| /droplets/{dropletId}/destroy{?credentials*} |]

---- /regions