> Well, that's what I thought too. But:
>
> parents <- function(x) {
> if (identical(x, emptyenv())) return()
> c(environmentName(x), parents(parent.env(x)))
> }
>> parents(as.environment("package:devtools"))
> [1] "package:devtools" "package:methods" "Autoloads" "base"
>
> And package:testthat isn't listed there. (But Autoloads is suggestive...)
Hmmm, autoloads isn't it:
> parent.env(parent.env(as.environment("package:devtools")))
<environment: 0x100951f88>
attr(,"name")
[1] "Autoloads"
> ls(parent.env(parent.env(as.environment("package:devtools"))))
character(0)
Hadley
--
Assistant Professor / Dobelman Family Junior Chair
Department of Statistics / Rice University
http://had.co.nz/
______________________________________________
R-devel@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
