From ea2dfee4e8327f4abfeae1b16dba6e016e157b1f Mon Sep 17 00:00:00 2001 From: Edgar Manukyan Date: Mon, 9 Dec 2024 01:19:30 +0000 Subject: [PATCH] #107 styler --- R/generate_code.R | 3 +-- R/generate_code_tempates.R | 1 - 2 files changed, 1 insertion(+), 3 deletions(-) diff --git a/R/generate_code.R b/R/generate_code.R index 4c42ce07..dedd1597 100644 --- a/R/generate_code.R +++ b/R/generate_code.R @@ -81,9 +81,8 @@ generate_code <- function(spec, domain, out_dir = ".") { topics <- unique(spec_domain$topic) code_by_topics <- purrr::map(topics, \(topic) { - spec_domain_topic <- spec_domain |> - dplyr::filter(topic %in% {{topic}}) + dplyr::filter(topic %in% {{ topic }}) domain_topic <- paste(domain, topic, sep = "_") |> tolower() diff --git a/R/generate_code_tempates.R b/R/generate_code_tempates.R index 4be634cb..eedfca81 100644 --- a/R/generate_code_tempates.R +++ b/R/generate_code_tempates.R @@ -1,4 +1,3 @@ - #' The template suffix for the cm code #' #' @noRd