Merge pull request #16 from pachadotdev/255

255

Author: pachadotdev

tests/testthat/test-vendor.R

@@ -1,31 +1,23 @@
-test_that("cpp_vendor errors if cpp11 is not installed", {
-  pkg <- local_package()
+describe("cpp_vendor", {
+  it("errors if cpp11 is not installed", {
+    pkg <- local_package()
+    mockery::stub(cpp_vendor, "system.file", "")
+    expect_error(
+      cpp_vendor(pkg_path(pkg)),
+      "cpp11 is not installed"
+    )
+  })
 
-  expect_error(
-    cpp_vendor(pkg_path(pkg), headers = ""),
-    "cpp11 is not installed"
-  )
-})
-
-test_that("cpp_vendor errors if cpp11 is already vendored", {
-  pkg <- local_package()
-  cpp_vendor(pkg_path(pkg))
-
-  expect_error(
-    cpp_vendor(pkg_path(pkg)),
-    "already exists"
-  )
-})
-
-test_that("cpp_vendor vendors cpp11", {
-  pkg <- local_package()
-  p <- pkg_path(pkg)
+  it("vendors cpp11", {
+    pkg <- local_package()
+    p <- pkg_path(pkg)
 
-  cpp_vendor(pkg_path(pkg))
+    cpp_vendor(pkg_path(pkg))
 
-  expect_true(dir.exists(file.path(p, "inst", "include", "cpp11")))
-  expect_true(file.exists(file.path(p, "inst", "include", "cpp11.hpp")))
-  expect_true(file.exists(file.path(p, "inst", "include", "cpp11", "declarations.hpp")))
+    expect_true(dir.exists(file.path(p, "inst", "include", "cpp11")))
+    expect_true(file.exists(file.path(p, "inst", "include", "cpp11.hpp")))
+    expect_true(file.exists(file.path(p, "inst", "include", "cpp11", "declarations.hpp")))
 
-  expect_silent(cpp_unvendor(pkg_path(pkg)))
+    expect_silent(cpp_unvendor(pkg_path(pkg)))
+  })
 })