key_create gives error "promise already under evaluation: ..."

[behrica]

I wanted to add my public key as described in the examples of the key_create method, but it always fails:

> key_create("rstudio@1959e4ee9e4e", readLines("~/.ssh/id_rsa.pub"))
Error in lapply(x, f) : 
  promise already under evaluation: recursive default argument reference or earlier problems?

[behrica]

same for droplet_snapshot

d %>% droplet_snapshot()
 Show Traceback

 Rerun with Debug
 Error in lapply(x, f) : 
  promise already under evaluation: recursive default argument reference or earlier problems? 

Traceback:

11 lapply(x, f) 
10 unlist(lapply(x, f)) 
9 Filter(Negate(is.null), x) at zzz.R#109
8 compact(body) at httr.R#29
7 do_POST(sprintf("droplets/%s/actions", droplet$id), query = list(type = jsonlite::unbox(action), 
    ...)) at droplet-actions.R#216
6 droplet_action("snapshot", droplet, name = name, ...) at droplet-actions.R#316
5 droplet_snapshot(d) 
4 eval(expr, envir, enclos) 
3 eval(e, env) 
2 withVisible(eval(e, env)) 
1 d %>% droplet_snapshot()