R/synapseGet.R

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

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

synapseGet <- 
  function(uri, 
    endpoint=synapseServiceEndpoint("REPO"), 
    curlHandle=getCurlHandle(), 
    anonymous = .getCache("anonymous"), 
    opts = .getCache("curlOpts"),  
    checkHttpStatus=TRUE,
	logErrorsToSynapse=TRUE,
	extraRetryStatusCodes=NULL
)
{
  ## constants
  kMethod <- "GET"
  ## end constants
  
  .synapseGetDelete(uri = uri, 
    endpoint = endpoint,
    requestMethod = kMethod,  
    curlHandle = curlHandle, 
    anonymous = anonymous, 
    opts = opts,
    checkHttpStatus=checkHttpStatus,
	logErrorsToSynapse=logErrorsToSynapse,
	extraRetryStatusCodes=extraRetryStatusCodes
  )
}