From 985eca868fdcfc88825a10f6242c7e36e879385f Mon Sep 17 00:00:00 2001 From: Chananchida Sang-aram VSCODE Date: Mon, 18 Sep 2023 15:01:53 +0200 Subject: [PATCH] removed string wrapping --- R/AbstractAnnData.R | 2 +- R/utilities.R | 3 +-- 2 files changed, 2 insertions(+), 3 deletions(-) diff --git a/R/AbstractAnnData.R b/R/AbstractAnnData.R index 61ed15d0..b4b4ceac 100644 --- a/R/AbstractAnnData.R +++ b/R/AbstractAnnData.R @@ -72,7 +72,7 @@ AbstractAnnData <- R6::R6Class("AbstractAnnData", # nolint )){ attr_key <- paste0(attribute, "_keys") if (!is.null(self[[attr_key]])){ - cat(pretty_print(attribute, self[[attr_key]]()), "\n", sep = "") + cat(" ", pretty_print(attribute, self[[attr_key]]()), "\n", sep = "") } } }, diff --git a/R/utilities.R b/R/utilities.R index b9a69588..a6127126 100644 --- a/R/utilities.R +++ b/R/utilities.R @@ -1,6 +1,5 @@ pretty_print <- function(label, value) { - txt <- paste0(label, ": ", paste0("'", value, "'", collapse = ", ")) - paste0(strwrap(txt, indent = 0, exdent = 2), collapse = "\n") + paste0(label, ": ", paste0("'", value, "'", collapse = ", ")) } wrap_message <- function(...) {