From c878d19f1e4e1d6c1653d88f933302d0c6cbd7b5 Mon Sep 17 00:00:00 2001 From: Antoine Fabri Date: Tue, 31 Dec 2024 13:46:36 +0100 Subject: [PATCH 1/2] construct_clip respects non default print modes --- R/construct.R | 3 +-- R/construct_clip.R | 2 +- 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/R/construct.R b/R/construct.R index 3dd98ba9..8319cfca 100644 --- a/R/construct.R +++ b/R/construct.R @@ -284,9 +284,8 @@ print.constructive <- function( if ("clipboard" %in% print_mode) { check_installed("clipr") - cli::cli_alert_info("Construct code has been added to the clipboard:") + cli::cli_alert_info("Code has been added to the clipboard") clipr::write_clip(paste(x$code, collapse = "\n"), "character") - print_mode <- union(print_mode, "console") } if ("console" %in% print_mode) { print(x$code) diff --git a/R/construct_clip.R b/R/construct_clip.R index 7fa9b564..42d56b68 100644 --- a/R/construct_clip.R +++ b/R/construct_clip.R @@ -39,5 +39,5 @@ construct_clip <- function( template = template, classes = classes ) - print(out, print_mode = "clipboard") + print(out, print_mode = union("clipboard", getOption("constructive_print_mode", "console"))) } From 0f59694de6803ec4c37b21245bf2ead8f3d69269 Mon Sep 17 00:00:00 2001 From: moodymudskipper Date: Tue, 31 Dec 2024 12:51:29 +0000 Subject: [PATCH 2/2] chore: Auto-update from GitHub Actions Run: https://github.com/cynkra/constructive/actions/runs/12559748168 --- man/constructive-package.Rd | 1 + 1 file changed, 1 insertion(+) diff --git a/man/constructive-package.Rd b/man/constructive-package.Rd index c5737f20..04f83ef1 100644 --- a/man/constructive-package.Rd +++ b/man/constructive-package.Rd @@ -25,6 +25,7 @@ Useful links: Other contributors: \itemize{ \item Kirill Müller \email{kirill@cynkra.com} (\href{https://orcid.org/0000-0002-1416-3412}{ORCID}) [contributor] + \item Jacob Scott \email{jscott2718@gmail.com} [contributor] } }