fix: pass parent.frame environment to describe_it

Author: averissimo

R/describe.R

@@ -94,5 +94,5 @@ it <- function(description, code = NULL) {
   check_string(description, allow_empty = FALSE)
 
   code <- substitute(code)
-  describe_it(description, code)
+  describe_it(description, code, env = parent.frame())
 }

tests/testthat/test-describe.R

@@ -37,6 +37,11 @@ describe("describe", {
     expect_equal(1, someInternalVariable)
   })
 
+  testthat::it("should be possible to use variables from outer environments with package prefix", {
+    expect_equal(1, someExternalVariable)
+    expect_equal(1, someInternalVariable)
+  })
+
   it("should not be possible to access variables from other specs (1)", {
     some_test_var <- 5
   })