R/synapsePost.R

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

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

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