Nothing
vcr_c <- NULL # nocov start
VCRHooks <- NULL
request_matchers <- NULL
request_ignorer <- NULL
cassette_serializers <- NULL
cassette_persisters <- NULL
light_switch <- NULL
vcr_cassettes <- NULL
initialize_ivars <- function() {
light_switch <<- new.env()
light_switch$turned_off <<- FALSE
light_switch$ignore_cassettes <<- FALSE
vcr_c$cassettes <<- list()
vcr_c$linked_context <<- NULL
request_matchers <<- RequestMatcherRegistry$new()
request_ignorer <<- RequestIgnorer$new()
cassette_serializers <<- Serializers$new()
cassette_persisters <<- Persisters$new()
}
.onLoad <- function(libname, pkgname){
# initialize vcr config object
vcr_c <<- VCRConfig$new()
# initialize hooks
VCRHooks <<- Hooks$new()
# initialize bucket of cassettes in session
vcr_cassettes <<- new.env()
# lots of things
initialize_ivars()
} # nocov end
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.