From 3c14ef83592b08971cd3dec4e54bef2bcd5bc207 Mon Sep 17 00:00:00 2001 From: Edgar Ruiz Date: Fri, 20 Sep 2024 21:43:06 -0500 Subject: [PATCH] Removes unused code, restores CI pkg tests --- .github/workflows/R-CMD-check.yaml | 2 +- .github/workflows/test-coverage.yaml | 2 +- R/m-defaults.R | 9 +-------- 3 files changed, 3 insertions(+), 10 deletions(-) diff --git a/.github/workflows/R-CMD-check.yaml b/.github/workflows/R-CMD-check.yaml index 660456f..960d062 100644 --- a/.github/workflows/R-CMD-check.yaml +++ b/.github/workflows/R-CMD-check.yaml @@ -2,7 +2,7 @@ # Need help debugging build failures? Start at https://github.com/r-lib/actions#where-to-find-help on: push: - branches: temp + branches: main pull_request: branches: main diff --git a/.github/workflows/test-coverage.yaml b/.github/workflows/test-coverage.yaml index f81a1d7..cf09f1b 100644 --- a/.github/workflows/test-coverage.yaml +++ b/.github/workflows/test-coverage.yaml @@ -2,7 +2,7 @@ # Need help debugging build failures? Start at https://github.com/r-lib/actions#where-to-find-help on: push: - branches: temp + branches: main pull_request: branches: main diff --git a/R/m-defaults.R b/R/m-defaults.R index b0535de..ed8315c 100644 --- a/R/m-defaults.R +++ b/R/m-defaults.R @@ -65,12 +65,5 @@ print.mall_session <- function(x, ...) { } session <- imap(x$session, \(x, y) glue("{col_yellow({paste0(y, ':')})}{x}")) label_argument <- "{col_green('R session:')}" - if (length(session) == 1) { - cli_inform(paste(label_argument, session[[1]])) - } else { - cli_inform(label_argument) - session <- as.character(session) - session <- set_names(session, " ") - cli_bullets(session) - } + cli_inform(paste(label_argument, session[[1]])) }