rename fct_attrs to fct

emitanaka · Oct 15, 2023 · 9fb8a0e · 9fb8a0e
1 parent a5ec0d0
commit 9fb8a0e
Show file tree

Hide file tree

Showing 3 changed files with 11 additions and 4 deletions.
diff --git a/NAMESPACE b/NAMESPACE
@@ -106,6 +106,7 @@ export(examine_process_values)
 export(examine_recipe)
 export(expect_rcrds)
 export(export_design)
+export(fct)
 export(fct_attrs)
 export(fct_edges)
 export(fct_generator)

diff --git a/R/attrs.R b/R/attrs.R
@@ -11,9 +11,9 @@
 #'
 #' @seealso lvls
 #' @examples
-#' fct_attrs(c("A", "B"))
+#' fct(c("A", "B"))
 #' @export
-fct_attrs <- function(.levels, ...) {
+fct <- function(.levels, ...) {
   dots <- dots_list(..., .named = TRUE, .homonyms = "keep", .ignore_empty = "all")
 
   if(length(dots)) {
@@ -30,6 +30,9 @@ fct_attrs <- function(.levels, ...) {
   .levels
 }
 
+#' @rdname fct
+#' @export
+fct_attrs <- fct
 
 #' Setting the traits of the levels
 #'

diff --git a/man/fct_attrs.Rd → man/fct.Rd b/man/fct_attrs.Rd → man/fct.Rd