From f2d0abecc7a4a6d640b008467d563a36e281c510 Mon Sep 17 00:00:00 2001
From: Rich FitzJohn <r.fitzjohn@imperial.ac.uk>
Date: Mon, 9 Nov 2020 16:34:23 +0000
Subject: [PATCH] Umpdate junk path example

---
 tests/testthat/test-bundle.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/testthat/test-bundle.R b/tests/testthat/test-bundle.R
index 56088da66..e300baff3 100644
--- a/tests/testthat/test-bundle.R
+++ b/tests/testthat/test-bundle.R
@@ -230,8 +230,8 @@ test_that("can't import an unrun bundle", {
 
 test_that("sensible error when given junk input", {
   path <- orderly::orderly_example("minimal")
-  tmp <- tempfile()
-  file.create(tmp)
+  tmp <- tempfile(fileext = ".zip")
+  zip_dir(file.path(path, "src"), tmp)
   expect_error(
     orderly_bundle_import(tmp, root = path),
     "Failed to extract bundle info from '.*'")