resizeDroplet :: DropletId -> SizeOptionId -> DigitalOcean (Response Event)
resizeDroplet dropletId sizeId = do
  credentials <- creds
  get [uri| /droplets/{dropletId}/resize{?credentials*} |]
  where size_id = sizeId

---- /droplets/{dropletId}/snapshot
resizeDroplet :: DropletId -> SizeOptionId -> DigitalOcean (Response Event)
resizeDroplet dropletId sizeId = do
  credentials <- creds
  get [uri| /droplets/{dropletId}/resize{?credentials*} |]
  where size_id = sizeId

---- /droplets/{dropletId}/snapshot
resizeDroplet dropletId sizeId = do
  credentials <- creds
  get [uri| /droplets/{dropletId}/resize{?credentials*} |]
  where size_id = sizeId

---- /droplets/{dropletId}/snapshot