TESTME: modernize

HenrikBengtsson · HenrikBengtsson · commit 7602fe38eea3 · 2025-12-20T14:46:52.000-08:00
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,5 +1,5 @@
 Package: future.mirai
-Version: 0.10.1-9007
+Version: 0.10.1-9008
 Depends:
     future (>= 1.49.0)
 Imports:
diff --git a/inst/testme/deploy.R b/inst/testme/deploy.R
@@ -62,11 +62,13 @@ for (kk in seq_along(files)) {
 
   ## Generate R unit test script
   code <- c(
+    "#! /usr/bin/env Rscript",
     sprintf("## This runs testme test script inst/testme/test-%s.R", name),
     "## Don't edit - it was autogenerated by inst/testme/deploy.R",
     sprintf('%s:::testme("%s")', pkgname, name)
   )
   writeLines(code, con = target_file)
+  Sys.chmod(target_file, mode = "0755")
 }
 
 message(sprintf("Deploying %d test scripts ... done", length(files)))
diff --git a/inst/testme/run.R b/inst/testme/run.R

Original file line number	Diff line number	Diff line change
`@@ -62,11 +62,13 @@ for (kk in seq_along(files)) {`
`62`	`62`
`63`	`63`	`## Generate R unit test script`
`64`	`64`	`code <- c(`
	`65`	`+ "#! /usr/bin/env Rscript",`
`65`	`66`	`sprintf("## This runs testme test script inst/testme/test-%s.R", name),`
`66`	`67`	`"## Don't edit - it was autogenerated by inst/testme/deploy.R",`
`67`	`68`	`sprintf('%s:::testme("%s")', pkgname, name)`
`68`	`69`	`)`
`69`	`70`	`writeLines(code, con = target_file)`
	`71`	`+ Sys.chmod(target_file, mode = "0755")`
`70`	`72`	`}`
`71`	`73`
`72`	`74`	`message(sprintf("Deploying %d test scripts ... done", length(files)))`