chore: new docs

DESCRIPTION

@@ -28,11 +28,13 @@ Suggests:
     rmarkdown,
     devtools,
     roxygen2,
-    spelling
+    spelling,
+    jsonlite,
+    testthat
 License: GPL (>= 3)
 Encoding: UTF-8
 LazyData: true
-RoxygenNote: 7.3.2
+RoxygenNote: 7.3.3
 URL: https://github.com/agdamsbo/REDCapCAST, https://agdamsbo.github.io/REDCapCAST/
 BugReports: https://github.com/agdamsbo/REDCapCAST/issues
 Imports: 

NEWS.md

@@ -6,6 +6,8 @@
 
 * FIX: Suggested dependencies were trimmed including {styler}.
 
+* FIX: export_redcap_instrument was updated to include default file name for the instrument zip. Ensures custom names has correct file extension.
+
 # REDCapCAST 25.11.1
 
 * FIX: logicals exported as numeric for data upload

man/clean_redcap_name.Rd

@@ -19,4 +19,5 @@ Trying to make up for different naming conventions.
 }
 \examples{
 "Research!, ne:ws? and c;l-.ls" |> clean_redcap_name()
+"8_new_TEST_" |> clean_redcap_name()
 }

man/create_instrument_meta.Rd

@@ -2,7 +2,7 @@
 % Please edit documentation in R/export_redcap_instrument.R
 \name{create_instrument_meta}
 \alias{create_instrument_meta}
-\title{DEPRICATED Create zips file with necessary content based on data set}
+\title{DEPRECATED Create zips file with necessary content based on data set}
 \usage{
 create_instrument_meta(data, dir = here::here(""), record.id = TRUE)
 }
@@ -20,6 +20,7 @@ Default is TRUE.}
 list
 }
 \description{
+Use export_redcap_instrument()
 Metadata can be added by editing the data dictionary of a project in the
 initial design phase. If you want to later add new instruments, this
 function can be used to create (an) instrument(s) to add to a project in

man/cut_string_length.Rd

@@ -18,5 +18,5 @@ character string of length l
 Cut string to desired length
 }
 \examples{
-"length" |> cut_string_length(l=3)
+"length" |> cut_string_length(l = 3)
 }

man/strsplitx.Rd

@@ -25,7 +25,9 @@ Can be used as a substitute of the base function. Main claim to fame is
 easing the split around the defined delimiter, see example.
 }
 \examples{
-test <- c("12 months follow-up", "3 steps", "mRS 6 weeks",
-"Counting to 231 now")
+test <- c(
+  "12 months follow-up", "3 steps", "mRS 6 weeks",
+  "Counting to 231 now"
+)
 strsplitx(test, "[0-9]", type = "around")
 }