R/onLoad.R

.onAttach <- function(libname, pkgname) {
    if (is_ec2() && Sys.getenv("AWS_DEFAULT_REGION") == "") {
        reg <- try(instance_document()$region, silent = TRUE)
        if (!inherits(reg, "try-error")) {
            Sys.setenv("AWS_DEFAULT_REGION" = reg)
            packageStartupMessage(sprintf("Setting environment variable AWS_DEFAULT_REGION to '%s'", reg))
        }
    }
}
jmorten/aws.ec2metadata documentation built on June 3, 2019, 2:12 p.m.