getInstanceSizeOptions :: DigitalOcean (Response [SizeOption])
getInstanceSizeOptions = do
  credentials <- creds
  get [uri| /sizes{?credentials*} |]

---- /domains
getInstanceSizeOptions :: DigitalOcean (Response [SizeOption])
getInstanceSizeOptions = do
  credentials <- creds
  get [uri| /sizes{?credentials*} |]

---- /domains
getInstanceSizeOptions = do
  credentials <- creds
  get [uri| /sizes{?credentials*} |]

---- /domains