R/synapsePut.R

In Sage-Bionetworks/rSynapseClientRewrite: Synapse R Client from Sage Bionetworks

## Send a put request to Synapse
## 
## Author: Matthew D. Furia <matt.furia@sagebase.org>
###############################################################################

synapsePut <- 
  function(uri, entity, host = .getRepoEndpointLocation(), curlHandle=getCurlHandle(), anonymous = FALSE, 
    path = .getRepoEndpointPrefix(), opts = .getCache("curlOpts"))
{
  ## constants
  kMethod <- "PUT"
  ## end constants
  
  .synapsePostPut(uri = uri, 
    entity = entity, 
    requestMethod = kMethod,
    host = host,
    curlHandle = curlHandle, 
    anonymous = anonymous, 
    path = path, 
    opts = opts
  )
}