Add/remove tags to a firewall
firewall_add_tags(id, tags, ...) firewall_remove_tags(id, tags, ...)
id
: (character) A firewall id (not the name) to deletetags
: (character) tag strings...
: Options passed on to httr::POST or httr::DELETE## Not run: drops <- droplets_create() drop_ids <- vapply(drops, "[[", numeric(1), "id") inbound <- list(list(protocol = "tcp", ports = "80", sources = list(addresses = "18.0.0.0/8"))) outbound <- list(list(protocol = "tcp", ports = "80", destinations = list(addresses = "0.0.0.0/0"))) res <- firewall_create("myfirewall", inbound, outbound) tag_create(name = "foobar") tags() firewall_add_tags(id = res$id, tags = "foobar") firewalls()[[1]]$tags firewall_remove_tags(id = res$id, tags = "foobar") ## End(Not run)