Ensure no template for now

mrc-ide · Oct 13, 2023 · 947c471 · 947c471
1 parent 5ee272e
commit 947c471
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/tests/testthat/test-orderly.R b/tests/testthat/test-orderly.R
@@ -101,3 +101,12 @@ test_that("allow creation of orderly.R in existing empty dir", {
     "Created 'src/foo/orderly.R'")
   expect_true(file.exists(file.path(path, "src/foo/orderly.R")))
 })
+
+
+test_that("disallow template arguments", {
+  path <- test_prepare_orderly_example(character())
+  expect_error(
+    orderly_new("foo", template = "other", root = path),
+    "'template' must be 'NULL' or 'FALSE' for now")
+  expect_false(file.exists(file.path(path, "src/foo")))
+})