inst/httptest/request.R

In pivotaltrackR: A Client for the 'Pivotal Tracker' API

function (request) {
    require(magrittr, quietly=TRUE)
    request %>%
        gsub_request("https://www.pivotaltracker.com/services/v5/", "", fixed=TRUE) %>%
        gsub_request(getOption("pivotal.project"), "123")
}