fun with file paths

cpsievert · cpsievert · commit 4fa2e5f9386d · 2016-04-01T15:56:47.000+11:00
diff --git a/tests/testthat.R b/tests/testthat.R
@@ -116,7 +116,7 @@ save_outputs <- function(gg, name) {
       dir.create(test_dir, recursive = T)
       # copy over diffing template
       file.copy(
-        dir(file.path(table_dir, "template"), full.names = TRUE), test_dir
+        dir(file.path(table_dir, "template", "template"), full.names = TRUE), test_dir
       )
       # overwrite the default JSON
       writeLines(

Original file line number	Diff line number	Diff line change
`@@ -116,7 +116,7 @@ save_outputs <- function(gg, name) {`
`116`	`116`	`dir.create(test_dir, recursive = T)`
`117`	`117`	`# copy over diffing template`
`118`	`118`	`file.copy(`
`119`		`- dir(file.path(table_dir, "template"), full.names = TRUE), test_dir`
	`119`	`+ dir(file.path(table_dir, "template", "template"), full.names = TRUE), test_dir`
`120`	`120`	`)`
`121`	`121`	`# overwrite the default JSON`
`122`	`122`	`writeLines(`