diff --git a/tests/testthat.R b/tests/testthat.R
index c4814a0..e22869b 100644
--- a/tests/testthat.R
+++ b/tests/testthat.R
@@ -1,4 +1,5 @@
 library(testthat)
 library(REDCapCAST)
 
+# testthat::test_dir(here::here("tests/testthat"))
 test_check("REDCapCAST")
diff --git a/tests/testthat/helper-paths.R b/tests/testthat/helper-paths.R
index 5a1607d..bd9b086 100644
--- a/tests/testthat/helper-paths.R
+++ b/tests/testthat/helper-paths.R
@@ -8,5 +8,7 @@
 
 # setwd("tests/testthat")
 
-get_data_location <- function(x)
+get_data_location <- function(x){
+  # here::here(file.path("tests","testthat","data", x))
   file.path("data", x)
+}
diff --git a/vignettes/Database-creation.Rmd b/vignettes/Database-creation.Rmd
index e8e8450..4967051 100644
--- a/vignettes/Database-creation.Rmd
+++ b/vignettes/Database-creation.Rmd
@@ -67,7 +67,7 @@ Additional specifications to the DataDictionary can be made manually, or it can
 
 ## Data base from table
 
-
+...instructions and examples are coming...
 
 
 ## Meta data and data upload