made it internal as was intended

insightsengineering · Apr 4, 2024 · c9058a7 · c9058a7
1 parent f1d2ac3
commit c9058a7
Show file tree

Hide file tree

Showing 3 changed files with 2 additions and 17 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -23,7 +23,6 @@ export(radsub)
 export(radtr)
 export(radtte)
 export(radvs)
-export(rcd_var_relabel)
 export(rel_var)
 export(replace_na)
 export(rtexp)

diff --git a/R/utils.R b/R/utils.R
@@ -188,14 +188,7 @@ retain <- function(df, value_var, event, outside = NA) {
 #'   name in `x` and the value to the new variable label.
 #' @return x (`data.frame`)\cr Data frame with labels applied.
 #'
-#' @examples
-#' adsl <- radsl()
-#' rcd_var_relabel(adsl,
-#'   STUDYID = "Study Identifier",
-#'   USUBJID = "Unique Subject Identifier"
-#' )
-#'
-#' @export
+#' @keywords internal
 rcd_var_relabel <- function(x, ...) {
   stopifnot(is.data.frame(x))
   if (missing(...)) {

diff --git a/man/rcd_var_relabel.Rd b/man/rcd_var_relabel.Rd